Составить программы вычесления суммы чисел 7 до 700 кратных 14

Ответы

Ответ дал: ShirokovP
0
var sum:integer;

begin
for var i:=7 to 700 do   
if (i mod 14 =0) then sum:=sum+i;
println(sum);
end.
Ответ дал: narkotlo1
0
А можно не встрочку ? А прям как в паскале что бы было
Ответ дал: ShirokovP
0
обновите
Вас заинтересует