Вот так, даже не знаешь, какой язык изучаешь? Держи задачу на Pascal.
Program symma; var i, a, s: integer; begin
s:=0; for i:=1 to 3 do begin write('введите число'); readln(a); s:=s+a; end;
writeln('s=',s);
end.
Вот так, даже не знаешь, какой язык изучаешь? Держи задачу на Pascal.
Program symma;
var
i, a, s: integer;
begin
s:=0;
for i:=1 to 3 do
begin
write('введите число');
readln(a);
s:=s+a;
end;
writeln('s=',s);
end.