Задано число nнайти сумму чисел от 1 до n включительно - вопрос №45778571 от данил20601 13.07.2020 20:53

Question

Информатика: Задано число nнайти сумму чисел от 1 до n включительно

данил20601 · Answer

Var n,s,i:integer;beginwrite( Введите число: );Readln(n);s:=0;for i:=1 to n do s:=s+i;Writeln( s= ,s);end....