Составьте программу сортировки по возрастанию значений трёх переменных: a,d,c.
222
407
Ответы на вопрос:
Var a, d, c, t: integer; begin readln(a, d, c); if a < d then begin t : = a; a : = d; d : = t; end; if a < c then begin t : = a; a : = c; c : = t; end; if d < c then begin t : = d; d : = c; c : = t; end; writeln(a, ' ', d, ' ', c); end.
Популярно: Информатика
-
Здохненко040301.09.2021 16:37
-
vvashr28.07.2022 17:43
-
emasihinp08dbq03.05.2023 12:40
-
2006marusya14.12.2022 16:02
-
takrosha17.06.2022 03:18
-
yayuk30.01.2023 22:06
-
f79gkr4st27.02.2020 06:40
-
3Человек302.12.2021 22:17
-
мурзик5503.12.2020 12:45
-
tyujg03.09.2021 20:44