Объяснить, в чем заключается синтаксическая ошибка (или ошибки) в приведенной программе. Написать тот вариант программы, который, по Вашему мнению, будет правильным.

Program Max

Var a, b, c : Real;

Begin

WriteLn('Введите три числа: '); ReadLn(a, b, c);

If a > b Then B := a; Else B := b;

If B > c Then WriteLn(B); Else WriteLn(c)

End.

В данной программе есть две синтаксические ошибки:

1. Оператор сравнения ">" записан неправильно как ">". Это может привести к ошибке компиляции.

2. Второй оператор условия записан неправильно. Вместо "Else" нужно написать "ElseIf".

Правильный вариант программы:

Program Max;
Var
a, b, c : Real;
Begin
WriteLn('Введите три числа: ');
ReadLn(a, b, c);
If a > b Then
b := a
ElseIf b > c Then
WriteLn(b)
Else
WriteLn(c)
End.