Задача 9 Урок 9
Primary tabs
Пользователь вводит четыре числа, найдите из них максимальное -- решите через вложенные блоки if в полной форме (без использования логических операций).
Примечание: решение с помощью AND более удобно на практике, но для тренировки понимания тут мы решаем через вложенные блоки.
var a, b, c, d, max: integer; begin write('Введите число a: '); read(a); write('Введите число b: '); read(b); write('Введите число c: '); read(c); write('Введите число d: '); read(d); if (a > b) then // находим максимальное из первых трех чисел if (a > c) then max := a else max := c else if (b > c) then max := b else max := c; if (max < d) then // сравниваем максимальное первых трех чисел с четвертым числом max := d; write('Максимальное число: ', max); readln(); end.
- Log in to post comments
- 422 reads