Язык паскаль, помогите пожалуйста ^_^
Если решите этот номер, то зайдите на мой аккаунт и решите 2 номер)
Если не тяжело конечно.
Приложения:
![](https://st.uroker.com/files/d5e/d5ed3a2bb78ed7e57e8cfe87ddea87a0.png)
Ответы
Ответ дал:
1
Ответ:
готово
Объяснение:
var i,n,sum:integer;
begin
write('n=');readln(n);
sum:=0; i:=1;
while i<=n do begin
sum:=sum+i; i:=i+1;
end;
writeln('Sum=',sum);
end.
Danyalox123:
Спасибо!
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
7 лет назад
7 лет назад