Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
IamGroot1
23.03.2021 22:34 •
Информатика
Дан массив c(17). определить кол во элементов кратного 11
Показать ответ
Ответ:
knopendui
13.07.2020 22:27
Var c:array[1..17] of integer;
i,k:integer;
begin
for i:=1 to 17 do read(c[i]);
k:=0;
for i:=1 to 17 do
if c[i] mod 11 = 0 then k:=k+1;
writeln('Количество элементов кратных 11 = ', k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
cherkashina711
21.05.2021 07:43
Алгоритм кумир надо создать алгоритм по типу pincode: ввод (мин 4 цифры; макс 4 цифры ) при вводе числа вывод ведено неверное число.при вводе числа вывод вы ввели...
Теразини
05.03.2023 05:44
Какую роль играет информатика в моей будущей профессии? надо написать мини сочинение(профессия архитектор...
ramser7300
16.06.2020 07:23
На html-страницу поместить текст, озаглавить его. выполнить форматирование текста. использовать все типы селекторов. . пришлите код html или текстовый документ....
мико141
14.05.2020 00:12
Ваш друг живёт на 4 этаже 16 ти этажного дома,найди объем информации,то есть i,не поленитесь и сфоткайте,написав на листочке,не понимаю когда пишут символами...
Khidjana95
24.11.2020 18:28
На двери деканата злоумышленники масляной краской нарисовали несколько карикатур на преподавателей. подозрение пало на известных хулиганов и вольнодумцев пашу и сашу....
jefimmalinovski
07.03.2020 05:16
Составить программу на паскале надо набрать и отладить программу нахождения наибольшего общего делителя и протестировать ее на следующих исходных данных: а) а=40...
2007AZAZA
07.03.2020 05:51
А)сколько музыкальных файлов размеров 4 мбайта может поместиться на одном cd диске размером 700 мегабайт б)сколько фотографий размером 4 мбайта может поместиться...
jauprosto
02.02.2022 13:59
20 учеников в классе любят играть в компьютерные игры, 25 – читать книги. всего в классе 35 учеников. сколько учеников любят и играть, и читать?...
ольга591
01.09.2021 17:15
Информатика на рисунке фрагмент электронной таблицы. какое число появится в ячейке d1, если скопировать в нее формулу из ячейки c2? a b c d 1) 1 2 3 2) 5 4 =a$2+$b$3...
JANAOOP29
23.01.2022 15:24
Один символ алфавита несёт 3 бита информации. сколько символов в алфавите ?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,k:integer;
begin
for i:=1 to 17 do read(c[i]);
k:=0;
for i:=1 to 17 do
if c[i] mod 11 = 0 then k:=k+1;
writeln('Количество элементов кратных 11 = ', k);
end.