Pascal. Смотреть фотографию во вложении.

// PascalABC.Net
var
  a,b:integer;
begin
  Write(Введите через пробел два целых числа: ); Read(a,b);
  if a>b then Writeln(a,>,b)
  else
   if a   else Writeln(Числа равны)
end.

Тестовое решение:
Введите через пробел два целых числа: 18 -7
18>-7

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку