СРОЧНО!18 БАЛЛОВ!!! В Pascal найти разность чисел в промежутке то -15 до 4 сделать с помощью REPEAT!!!
СРОЧНО!18 БАЛЛОВ!!!
В Pascal найти разность чисел в промежутке то -15 до 4
сделать с помощью REPEAT!!!
Гость
Ответ(ы) на вопрос:
ГостьПолучилось: 80
Var
r,i : Integer;
Begin
i:=-14;
r:=-15;
Repeat
r:=r-i;
Inc(i);
Until i>4;
Writeln(r);
end.
Не нашли ответ?
Похожие вопросы