Нужна с клавиатуры вводятся натуральные числа.конец - вопрос №2033300 от RMaGaR 16.10.2020 19:32

Question

Информатика: Нужна с клавиатуры вводятся натуральные числа.конец ввода чисел–0,в подсчетколичества не входит.вычислить и вывести на экран количество чисел,кратных 7. ​

RMaGaR · Answer

var    a, n : integer;begin    repeat        read(a);        if a div 7 = 0 then n += 1;    until a = 0;    writeln(n);end....

Нужна с клавиатуры вводятся натуральные числа.конец ввода чисел–0,в подсчетколичества не входит.вычислить и вывести на экран количество чисел,кратных 7. ​

Нужна с клавиатуры вводятся натуральные числа.конец ввода чисел–0,в подсчетколичества не входит.вычислить и вывести на экран количество чисел,кратных 7.