1) Перед вами программа к задаче «Вводить пары чисел, пока первое
число больше второго».
Var a, b: integer;
Begin
While a>b do begin
writeln('введите пару чисел"); readln(a,b);
end;
Write('условие нарушилось");
end.

Найдите ошибку в программе и исправьте ее.

DaNa1517    1   29.04.2020 12:13    3