Даны три числа а,б и с .Выясните верноли отношение а

program thebiggest; //Название программы.

var a, b, c: integer; //Раздел описания переменных.

begin //Начало.

writeln(\'Введите первое число\'); //Запрашиваем первое число.

readln(a); //Считываем первое число.

writeln(\'Введите второе число\'); //Запрашиваем второе число.

readln(b); //Считываем второе число.

writeln(\'Введите третье число\'); //Запрашиваем третье число.

readln(c); //Вводим третье число.

if (a < b) and (a < c) and (b < c) then writeln(\'Условие выполняется\') else writeln(\'Условие не выполняется\'); //Проверяем условие и выводим ответ.

end.