Найдите наибольшее значение из 3 цифр (любых) , увеличте на 7 и результат вывидете…

Question

47

Найдите наибольшее значение из 3 цифр (любых) , увеличте на 7 и результат вывидете на экран! (Составитьпрограмму)

в избранное ссылка

Знаете ответ?

liptonteam · Accepted Answer

73

liptonteam

07 марта 2023

Var a,b,c,max: integer; begin readln (a,b,c); if (a>b) and (a>c) then max: =a else if (b>a) and (b>c) then max: =b else max: =c; writeln (max+7) end.

комментировать

в избранное ссылка отблагодарить