Составьте программу вычисления суммы чисел кратных 7 в диапазоне от 1 до 100. обязательно используя команды repeat и until.

Question

Информатика: Составьте программу вычисления суммы чисел кратных 7 в диапазоне от 1 до 100. обязательно используя команды repeat и until.

ako91545 · Answer

program test;var i,s:integer;begins:=0;i:=1;repeatif i mod 7 = 0 then s:=s+i;i:=i+1until i 100;write(s)end....