Составьте программу для вычисления суммы натуральных чисел от 20 до 99.решите в двух вариантах-с использованием операторов while и repeat.

Var i,s:integer;
begin
i:=20;
while i<100 do
  begin
  s:=s+i;
  i:=i+1
  end;
writeln('ответ: ',s)  
end.

var i,s:integer;
begin
i:=20;
repeat
   s:=s+i;
   i:=i+1;
   until i>99; 
writeln('ответ: ',s)  
end.