Нужна с клавиатуры вводятся натуральные числа.конец - вопрос №2042320 от Слава200109 28.05.2022 07:15

Question

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

Слава200109 · 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.