Вопрос Программа в pascal, 8 класс

[ывафыав]

Написать программу на паскаль, вычисляющую сумму ряда

S = 10+11+12+…+n, при условии, что переменная n задается пользователем с клавиатуры (использовать оператор цикла while

условие do оператор)

 

[ergerg]

maskal

 

[ДенискаЯ]

На*уй вообще преподают паскаль в школе, им уже как лет 10-20 не пользуются

 

[mactep20]

program sum_series;
var
n : integer;
begin
readln;
while true do
begin
writeln((n * n + n - 90) div 2);
break;
end;
end.

 

[vavan12]

program sum_series;
var
n, sum, i: integer;
begin
sum := 0;
i := 10;
readln;
while i