var a,b:integer; begin write('Введите два числа: '); readln(a,b); if a>b then writeln('Полученные числа: ',a 1,#10,b-1) else writeln('Полученные числа: ',a-1,#10,b 1); readln; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.