Преобразовать алгоритм в программу ** языке Паскаль

Question

Преобразовать алгоритм в программу на языке Паскаль

---

Answer 1

Если посмотреть, то практически русские слова заменили английскими.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

program Задача;
begin
  var a,b:real;
  Read(a,b);
  if a    then Writeln('число ',a,' меньше числа ',b)
    else Writeln('число ',b,' меньше числа ',a)
end.

На самом деле можно написать и несколько покороче

begin
  var (a,b):=ReadReal2;
  if a  else Writeln('число ',b,' меньше числа ',a)
end.

Comments

Кстати, кривоватый алгоритм: введите два одинаковых числа и увидите.

Answer 2

Var a,b:real;
begin
readln (a,b);
if aelse writeln('число ',b,' меньше числа ',a)
end.