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