Question

СРОЧНО!18 БАЛЛОВ!!! В Pascal найти разность чисел в промежутке то -15 до 4 сделать с помощью REPEAT!!!

Answer 1

Получилось: 80

Var
  r,i : Integer;
Begin
  i:=-14;
  r:=-15;
  Repeat
    r:=r-i;
    Inc(i);
  Until i>4;
  Writeln(r);
end.