Ответы на вопрос:
Var m,n: integer; begin readln(m,n); if m< > n then begin if m> n then n: =m else m: =n; end else begin m: =0; n: =0; end; writeln(m,' ',n); end.
Популярно: Информатика
-
aibar414.03.2022 19:33
-
Omniscient1www18.05.2021 19:02
-
ksusha25night14.10.2021 21:20
-
Ro4KKy17.03.2021 03:26
-
lddobroz07.04.2020 02:27
-
IkaNika19.08.2020 09:45
-
detsadraduga1030.03.2021 21:03
-
aliksondrrr314.07.2022 19:06
-
irishanovikova0123.11.2020 03:11
-
Keranius02.10.2021 18:03