Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
хорош16
14.06.2022 23:42 •
Информатика
Нужна с клавиатуры вводятся натуральные числа.конец ввода чисел–0,в подсчетколичества не входит.вычислить и вывести на экран количество чисел,кратных 7.
Ответ:
Vureshivatel
24.05.2020 20:57
var
a, n : integer;
begin
repeat
read(a);
if a div 7 = 0 then n += 1;
until a = 0;
writeln(n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
uncu4ek
09.01.2023 09:41
Примеры декларативных и процедурных знаний. только те примеры которые знает обычный семиклассник...
evozniukk
09.01.2023 09:41
Как определить информационный объём имени? например: иванов иван иванович. (считать, что в алфавите 64 символа)....
parus27
02.05.2021 19:42
«Могу ли я завтра одолжить на несколько часов твой ноутбук HP Envy x360 (2020) 15-ed0019ur? - спросил один студент другого. «Да», - ответил он. Какое количество информации содержит...
Алентина
05.04.2023 06:35
Файл объемом 2,5 гиго байтов передаётся со скоростью 50 мбит/сек ..найти время...
Devil536
09.07.2022 02:01
Вкаком из перечисленных ниже предложении правильно расставлены пробела между словами и знаками препинания? 1)добрая слава бежит, а худая-летит. 2)добрая слава бежит,а худая -...
егорка158
09.07.2022 02:01
Сколько битов видеопамяти на один пиксель требуется для хранения двухцветного, четырехцветного, восьмицветного, шестнадцатицветного изображения....
Mrx7777
18.07.2022 03:11
Напишите программу, которая находит все символы в символьной строке, которые встречаются только один раз. входные данные на вход программы подаётся символьная строка. выходные...
1111Кристина11111
03.02.2022 17:49
Решите уравнения 1) 3x-1 x 5-x - -- = 6 3 9 2)x^2+1 x =0 -- 7 это дробь - это знак минус...
nick313
03.02.2022 17:49
Как человек использует богатство леca...
noniqname
03.02.2022 17:49
От двух пристаней одновременно навстречу друг другу отошли два катера и встретились через 5часов.какой катер находился в пути до встречи дольше,если скорость первого была 23км...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
a, n : integer;
begin
repeat
read(a);
if a div 7 = 0 then n += 1;
until a = 0;
writeln(n);
end.