Решить по ивт на языке паскаль. задано 3 числа найти наибольшее из них.
nikita404590
1
19.05.2019 21:10
0
Другие вопросы по теме Информатика
HALERIOP
25.04.2020 11:58
дядялёняййццйуйу
13.06.2019 18:10
23149004316
13.06.2019 18:10
mrsdyy
13.06.2019 18:10
ailanka87
12.05.2020 10:56
КОТ20052005Кот
28.07.2019 18:30
rilyakip0730v
10.01.2020 10:53
vvndas1
10.01.2020 08:26
Anel7575
25.05.2020 10:25
Популярные вопросы
- Из вершины тупого угла ромба,равного 120 градусов,проведена высота,которая отсекает...
3 - Из города в село выехал автобус. когда он проехал 2 часа со скоростью 60 км./...
2 - Скажите почему я такая маленькая ,а плонета...
1 - Мальчик решил изготовить глобус диаметром в миллиард раз меньше диаметра земли.радиус...
3 - Вычислить sin 72* cos 12-sin 12 *cos 72...
1 - 1) как троекуров шабакина, который отнять имение у дубровского? 2)кто унизил...
2 - Выпиши слова в два столбика. в один столбик запиши слова, в которых мягкость...
3 - Керосин по каплям вытекает из бюретки через отверстие диаметром 2 мм,причем капли...
1 - ответьте на вопросы: устройство вывода информации? устройство хранения программ...
1 - Перемитор прямоугольника равен 28 см.его длина больше ширины на 4 см.найдите...
3
var
a1, a2, a3, max: integer;
begin write ('Введите три числа: ');
readln (a1, a2, a3);
if a1 >= a2
then max := a1
else max := a2;
if a3 > max
then max := a3;
writeln ('Наибольшее из них: ', max);
readln
end.