Задача 6.3 Урок 9
Primary tabs
Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:
Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.
var a,b,c,max:integer; begin writeln('Vedite chislo a'); readln(a); writeln('Vedite chislo b'); readln(b); writeln('Vedite chislo c'); readln(c); if (a>b)then max:=a else max:=b; if (c>max)then max:=c; writeln('vivoditsya bolsshee chislo ',max); readln(); end.
Вывод консоли:
Vedite chislo a 2 Vedite chislo b 2 Vedite chislo c 3 vivoditsya bolsshee chislo: 3
- Log in to post comments
- 854 reads