Урок 6 задача 14

Урок 6 задача 14

пользователь вводит четыре числа, проверьте, что первое больше третьего и при этом (одновременно второе меньше четвертого).

program Project1;
var
a,b,c,d:integer;
n:boolean;

begin
   write('Введи числа через Enter A, B, C, D: ');
   read(a, b, c, d);
   readln();
   n:=(A > C) and (B < D);
   writeln('Ответ =  ', n);
   readln();
end.  

Консоль

Введи числа через Enter A, B, C, D: 54
45
65
23
Ответ =  FALSE