Найдите сумму всех натуральных чисел на промежутке - вопрос №25792161 от modernteenager1 08.07.2022 20:13

Question

Информатика: Найдите сумму всех натуральных чисел на промежутке от 1 до n. число n вводится на клавиатуре.составьте на паскале с циклом while

modernteenager1 · Answer

Varn,i,sum:integer;begin readln(n);sum:=0;i:=0;while i n do  begin  i:=i+1;  sum:=sum+i;end;writeln(sum);end....