Мини-Паскаль на неймане - Pascal

Такое задание, очень страшный синтаксис у этого нейман мини-паскаль. Не знаю в какой раздел кидать. Найти наибольшее из четырёх чисел.

ап темки

Листинг программы

var a,b,c,d:Real;
begin
  Read(a,b,c,d);
  if a>b then b:=a;
  if b>c then c:=b;
  if c>d then d:=c;
  Write(d);
end.

Объяснение кода листинга программы

Объявлены четыре переменные типа Real: a, b, c, d.
Происходит чтение значений этих переменных с помощью функции Read(a, b, c, d).
Если значение переменной a больше значения переменной b, то значение переменной b присваивается значение переменной a.
Если значение переменной b больше значения переменной c, то значение переменной c присваивается значение переменной b.
Если значение переменной c больше значения переменной d, то значение переменной d присваивается значение переменной c.
Выводится значение переменной d с помощью функции Write(d).
Конец программы.