СРОЧНО, ИНФА! ПРОГРАММИРОВАНИЕ - ЦИКЛЫ! Найти сумму первых 20 чисел, кратных 6.

Question

СРОЧНО, ИНФА! ПРОГРАММИРОВАНИЕ - ЦИКЛЫ!
Найти сумму первых 20 чисел, кратных 6.

Answer 1

Var i,s:integer;
begin
s:=0;
for i:=1 to 20 do s:=s+6*i;
writeln('s = ',s);
end.

Результат:
s = 1260