Ответы на вопрос:
Var a, b: integer; procedure max(a, b: integer); begin if(a > b) then write(a) else write(b); end; begin read(a, b); max(a, b); end.
Популярно: Информатика
-
ismailov3466708.03.2020 11:04
-
60715619.12.2021 04:53
-
Deyzer77711.03.2023 07:41
-
1234fghh27.01.2021 03:00
-
катя4673788904.05.2020 00:02
-
nastya03051311.08.2022 15:02
-
катя509202.06.2020 08:11
-
PISOS228XYI28.12.2020 07:14
-
CorrupteD18.01.2021 23:48
-
Данил2001000120.12.2022 23:49