Задача 6 Урок 9
Primary tabs
Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:С использованием логической операции and.
С вложенными блоками (без and, все опараторы if должны быть в полной форме).
Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.
Способ 1:
var a, b, c : integer; begin writeln('vvedite a, b, c'); readln(a, b, c); if ((a >= b) and (a >= c)) then writeln('a naibolshee') else if ((b > c) and (b > a)) then writeln('b naibolshee') else writeln('c naibolshee'); readln(); end.
Способ 2:
var a, b, c : integer; begin writeln('vvedite a, b, c'); readln(a, b, c); if (a > b) then if (a > c) then writeln ('a naibolshee') else writeln ('c naibolshee') else if (b > c) then writeln ('b naibolshee') else writeln ('c naibolshee'); readln(); end.
Консоль:
vvedite a, b, c 1 2 3 c naibolshee
Способ 3:
var a, b, c, max2, max3: integer; begin writeln('vvedite a, b, c'); readln(a, b, c); if (a > b) then max2 := a else max2 := b; if (max2 < c) then max3 := c else max3 := max2; writeln('Naibolshee chislo:', max3); readln(); end.
Консоль:
vvedite a, b, c 1 2 1 Naibolshee chislo:2
- Log in to post comments
- 650 reads
vedro-compota
Sat, 02/26/2022 - 20:42
Permalink
var a, b, c : integer;
-- проверить для набора значений
+ можно посмотреть видео-разбор (см. условие задачи в уроке)
_____________
матфак вгу и остальная классика =)
vedro-compota
Sat, 03/05/2022 - 20:35
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)