ребят, очень нужна помощь
С клавиатуры вводятся натуральные числа.Конец ввода чисел–0,в подсчет
количества не входит.Вычислить и вывести на экран количество чисел,
кратных 7.
С клавиатуры вводятся натуральные числа.Конец ввода чисел–0,в подсчет
количества не входит.Вычислить и вывести на экран количество чисел,
кратных 7.
More Questions From This User See All
Answers & Comments
var
a, n : integer;
begin
repeat
read(a);
if a div 7 = 0 then n += 1;
until a = 0;
writeln(n);
end.