Boolean6. Даны три целых числа: $$A$$, $$B$$, $$C$$. Проверить истинность высказывания: «Справедливо двойное неравенство $$A < B < C$$».
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 |
program Boolean6; var A,B,C: Integer; begin Write('Введите число A: '); Readln(A); Write('Введите число B: '); Readln(B); Write('Введите число C: '); Readln(C); Writeln((A<B) and (B<C)); end. |
Другие задачи из раздела Boolean можно посмотреть здесь.
Комментарии: