Решить задачу в паскале авс ..."даны 3 любых числа, вывести на экран максимальное". через оператор "if
Решить задачу в паскале авс ..."даны 3 любых числа, вывести на экран максимальное". через оператор "if
Гость
Ответ(ы) на вопрос:
ГостьVar
a,b,c:integer;
Begin
write('Введите a,b,c (через пробел)');
Readln(a,b,c);
Write('Самое большое из них ');
if (a>b) and (a>c) then write(a) else if b>c then write(b) else write(c);
End.
Не нашли ответ?
Похожие вопросы