Нужна с клавиатуры вводятся натуральные числа.конец - вопрос №0203730 от какаха105 10.01.2023 06:23

Question

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

какаха105 · 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.