Робот умеет выполнять 4 команда.какое количество информации мы получим при выполнении одной из
145
190
Ответы на вопрос:
Program n1; const n = 6; var a : array[1..n] of integer; i, max, min, temp : integer; begin for i : = 1 to n do readln(a[i]); min : = 1; max : = 1; for i : = 1 to n do begin if a[i] > a[max] then max : = i; if a[i] < a[min] then min : = i; end; temp : = a[max]; a[max] : = a[min]; a[min] : = temp; for i : = 1 to n do write(a[i],' '); end.
Популярно: Информатика
-
КристинаВощевоз55528.02.2021 00:39
-
gulsaakamaeva04.04.2023 01:38
-
Colere26.03.2021 18:10
-
popovaviktoriy313.04.2021 07:54
-
индокролбак05.05.2023 22:27
-
Unik200228.04.2022 21:33
-
Yasmin1111110.02.2022 02:48
-
zoyabludova1909.04.2022 18:05
-
Yuliya47510.08.2022 17:51
-
ybr64309.01.2022 10:12