Question

Помогите пожалуйста) нужно записать программу и проверить в поскале. Я плоха по информатике. Поэтому жду вашей помощи ✨
алг
цел s k
нач
s: 0
нц для k от 1 до 5
s:=s+2*k
кц
вывод s
кон

Answer 1

var s, k: integer;

begin

s := 0;

for k:=1 to 5 do begin

s:= s + 2 * k;

end;

writeln(s);

end.