Задача 7 Урок 9
Primary tabs
Пользователь вводит четыре числа, найдите из них максимальное.
var a, b, c, d: real; begin writeln('Введите число a: '); readln(a); writeln('Введите число b: '); readln(b); writeln('Введите число c: '); readln(c); writeln('Введите число d: '); readln(d); if (a > b) and (a > c) and (a > d) then writeln('Число a максимальное'); if (b > a) and (b > c) and (b > d) then writeln('Число b максимальное'); if (c > a) and (c > b) and (c > d) then writeln('Число c максимальное'); if (d > a) and (d > b) and (d > c) then writeln('Число d максимальное'); readln(); end.
- Log in to post comments
- 650 reads