Ответы на вопрос:
program summa;
uses crt;
var s, i, n: integer;
begin
write ('n='); readln (n);
s: =1; write ('s=1');
for i: =2 to n do
begin
s: =s+i;
write ('+', i);
end;
write ('=', s);
readln;
end.
Популярно: Информатика
-
radvika0824.08.2020 15:11
-
PashaPlaytri28.04.2023 09:43
-
misheln04.06.2020 11:33
-
кирюха667719.12.2021 15:01
-
1234567890ваня29.01.2020 20:56
-
mangle5628.06.2023 11:11
-
yakinaanna08.06.2023 07:18
-
bekkalvina240513.09.2021 11:21
-
Dwtop102.02.2020 09:15
-
bajkovat728.03.2022 07:50