Найдите сумму всех натуральных чисел на промежутке - вопрос №12579784 от меаавепеу 25.06.2021 00: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....