Question

ребят, очень нужна помощь
С клавиатуры вводятся натуральные числа.Конец ввода чисел–0,в подсчет

количества не входит.Вычислить и вывести на экран количество чисел,

кратных 7.
​

Answer 1

var

   a, n : integer;

begin

   repeat

       read(a);

       if a div 7 = 0 then n += 1;

   until a = 0;

   writeln(n);

end.

Answer 2

Здравствуйте, помогите, пожалуйста. Ответ, который дан, неясен https://znanija.com/task/31857956

Answer 3

К сожалению я не знаю С++ и помочь могу только с Pascal, HTML, PERL. JS, Lua

Answer 4

а это все в pascal нужно сделать

Answer 5

то задание удалено. пересоздай. только уточни размер массива, нужно ли выводить на экран массив до и после замены...