Решить по программе Паскаля, полное решения: Ввести 2 числа

Question

Решить по программе Паскаля, полное решения: Ввести 2 числа. Вычесть из большого меньше. If A>B thenc: =А-В

Answer 1

35

lionex

20 марта 2023

var a,b: integer; Begin read (a,b); if a>b then a: =a-b else a: =b-a; writeln (a); End. Альтернатива может быть просто по модулю var a,b: integer; Begin read (a,b); writeln (abs (a-b); End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: