Урок 6 задача 14
Primary tabs
пользователь вводит четыре числа, проверьте, что первое больше третьего и при этом (одновременно второе меньше четвертого).
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
- Log in to post comments
- 540 reads