Задача 6 Часть 1 Урок 9
Primary tabs
Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:С использованием логической операции and.
С вложенными блоками (без and, все опараторы if должны быть в полной форме).
Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.
var a,b,c : integer; begin writeln ('vvedite chislo A '); readln(a); writeln ('vvedite chislo B '); readln(b); writeln ('vvedite chislo C '); readln(c); if ((a>b) and (a>c)) then writeln ('bolshee chislo A= ',a); if ((b>a) and (b>c)) then writeln ('bolshee chislo B= ', b); if ((c>a) and (c>b)) then writeln ('bolshee chislo C= ', c); readln(); end.
- Log in to post comments
- 391 reads