Урок 9 Задача 2

Урок 9 Задача 2

Сдавать/выладывать решение не обязательно:
Есть код:

var a, b, c, d : integer;
begin
writeln('vvedite a, b, c, d');
readln(a, b, c, d);
if (a > b) then
if (a > c) then
begin
if (a > d) then
writeln ('Выбираем a');
writeln ('Может выбрали a');
end;
readln();
end.
-- исправьте форматирование.

program u12z2;
var a, b, c, d : integer;
begin
  writeln('vvedite a, b, c, d');
  readln(a, b, c, d);
  if (a > b) then
    if (a > c) then
    begin
      if (a > d) then
        writeln ('Выбираем a');
        writeln ('Может выбрали a');
    end;
  readln();
end