Задача 3 урок 9
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число A находится между числами B и C» -- выведите "да", если истинно и "нет" если ложно.
ПРИМЕЧАНИЕ: эта следующая задача базируются на том, что мы уже решали (см. задачи в конце урока).
var A,B,C: integer; d1,d2,d3: boolean; begin writeln('vvedite A,B,C'); readln(A,B,C); d1:=(A>B)and(A<C); d2:=(A>C)and(A<B); writeln (d1 or d2); begin if (d1 or d2) then writeln('Da') else writeln('net') end; readln(); end.
вывод консоли
vvedite A,B,C 5 7 2 TRUE Da
вывод консоли
vvedite A,B,C 3 1 2 FALSE net
- Log in to post comments
- 657 reads