Найдите сумму всех натуральных чисел на промежутке - вопрос №12579441 от Воронбец 13.11.2020 20:00

Question

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

Воронбец · 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....