Потянетли мафия 3на слабом компе комплектующие- прцесор 3 ядра виде карта на 1 гиг. 8 г оперативка блок питания 400 ват
264
476
Ответы на вопрос:
Var a,min,max: real; i: integer; begin max: =-999999; min: =999999; for i: =1 to 10 do begin read(a); if a> max then max: =a; if a< min then min: =a; end; writeln(max-min); end.
Популярно: Информатика
-
Olegbro36468223.01.2022 18:47
-
Данька22822808.10.2021 03:17
-
sananana114.04.2022 17:58
-
irina95629.10.2022 23:56
-
robertva69321.05.2020 13:54
-
vladimir123204.06.2023 08:57
-
veronichka141416.04.2021 00:31
-
artemmavericksmesrri12.08.2021 01:43
-
shlykhta9527.08.2021 12:26
-
Halula26.06.2020 07:25