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

Question

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

Answer 1

Var sum:integer;

begin
for var i:=7 to 700 do   
if (i mod 14 =0) then sum:=sum+i;
println(sum);
end.

Comments

А можно не встрочку ? А прям как в паскале что бы было

---

обновите