Нужна с клавиатуры вводятся натуральные числа.конец ввода чисел–0,в подсчетколичества не входит.вычислить и вывести на экран количество чисел,кратных 7.
РоузХз
3
10.03.2019 23:00
6
Другие вопросы по теме Информатика
progonskaij
26.05.2020 19:18
Ryuuko
26.05.2020 19:18
Ханоглан122
26.05.2020 19:18
sonatap01f6p
28.07.2019 16:40
lolol6y
28.07.2019 16:40
cnastya970
08.09.2019 05:10
соыварщ
08.09.2019 05:10
AmiKot1105
08.09.2019 05:10
lalove5
08.09.2019 05:10
Популярные вопросы
- Провiдмiняти числiвник двiстi шiстдесят три...
2 - Сделайте сочинение на тему образования и воспитания в комедии недоросль...
1 - 1. составьте формулы высших оксидов и гидроксидов элементов iа группы (li, na, k,...
1 - Что такое проблемы? чем они они отличаются от других проблем, стоящих перед обществом?...
2 - Доклад на тему обитатели лесной подстилки...
3 - Мне и нам это какой разряд местоимений? название разряда...
1 - Сумма чисел 22 и 27 в этом 7 раз больше задуманного числа. какое число придумали?...
3 - Найдите область определения функции у = корень х / (х+2)(х-5)...
3 - Выражение и найдите его значение a) 128+(a+472) если a = 147 б) (b+168)-78 если...
1 - Вданные предлодения вставить подходящие по смыслу слова.подчеркнуть главные члены...
2
var
a, n : integer;
begin
repeat
read(a);
if a div 7 = 0 then n += 1;
until a = 0;
writeln(n);
end.