Question

напишите программу которая суммирует числа от 1 до 10,используя цикл while
пожалуйста помогите​

Answer 1

Pascal

var

 i,s:integer;

begin

 i:=1;

 s:=0;

 while i<=10 do begin

   s:=s+i;

   inc(i);

 end;

 print(s);

end.