Ответы на вопрос:
Var a,b,c,d,max: integer; begin writeln('vvedite chusla'); readln(a,b,c,d); max: =a; if max< b then max: =b; if max< c then max: =c; if max< d then max: =d; writeln('max=',max); end.
Популярно: Информатика
-
polycononova2024.04.2022 18:46
-
shahboz311.10.2020 09:14
-
фокс3627.08.2020 13:50
-
Sheva03118.06.2023 19:41
-
ипоопан24.12.2022 03:18
-
Ольчик07119624.12.2022 02:55
-
Ipro300010.06.2022 00:54
-
KsKitty14.05.2022 11:27
-
Angel908703.04.2020 16:27
-
yuliyakoshka011.05.2023 14:33