Урок №9 Задание 5
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число A находится между числами B и C» -- выведите "да", если истинно и "нет" если ложно.
program Pr9_5; var a,b,c:integer; begin writeln('Введите три числа: '); readln(a,b,c); if (a>b) and (a<c) then writeln('Да') else writeln('Нет'); readln(); end.
Консоль:
Введите три числа: 1 2 3 Нет
- Log in to post comments
- 347 reads