Напишите программу находящую максимальное из четырех чисел (используйте…

Question

72

Напишите программу находящую максимальное из четырех чисел (используйте процедуру для поиска максимального из двух чисел)

категория: информатика

ответить

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

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

alexey001 · Accepted Answer

55

alexey001

09 марта 2023

Program ufhg; uses crt; var a,b,c,d, m: integer; begin readln (a,b,c,d); m: =a; if (b>m) then m: =b; if (c>m) then m: =c; if (d>m) then m: =d; writeln (m); end.

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

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

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: