Nedumask
6 год назад
Пожалуйста посчитайте ПЖЛ ЭТО НАДО СРОЧНО!!!
ОТВЕТЫ
Максимильян
Oct 24, 2020
var s,n,i:longint;
begin
read(n);
for i:=1 to n do
s:=s+i;
write(s);
end.
begin
read(n);
for i:=1 to n do
s:=s+i;
write(s);
end.
601
Регистрация
Войти
Стать экспертом Правила
