Задача 6.3 Урок 9
Primary tabs
Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:
Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.
var a, b, c, f, i: integer; begin a := 2; b := 4; c := 6; if (a > b) then f := a else f := b; if (b > c) then f := b else f := c; if (c > a) then i := c else i := a; if (f > i) then writeln('otvet: ', f) else writeln('otvet: ', i); readln(); end.
КОНСОЛЬ:
otvet: 6
- Log in to post comments
- 579 reads