Ответы на вопрос:
ответ:
for i: = 1 to 20 do begin
a (i) : = (i + 4) mod 5;
end;
тут массив забивается числами от 0 до 4
for i: = 1 to 20 do begin
if a[i] > m then
m : = a[i];
if a (i) < n then
n : = a[i];
end;
здесь ищем макс(м) и мин(н) этого массива, они конечно равны 4 и 0 соответственно.
х=(m - n) mod 5=(4 - 0) mod 5=4
for i: = 1 to 20 do begin
if a[i] = x then
write(i, ' ');
end;
тут через пробел выводиться номера элементов, чье значение совпадает с х. а это 1 6 11 16
вот и ответ: 1 6 11 16
Популярно: Информатика
-
allapogorelayaoxd0fz13.03.2022 19:21
-
Svetiksmail545420.06.2023 05:44
-
мирас6807.09.2022 08:46
-
1DLove1112.11.2022 18:17
-
Nastia204725.12.2021 06:27
-
Asian2811.12.2020 00:05
-
anastasia20001215.09.2020 05:08
-
DarkZlo14.06.2021 09:15
-
grinevvlad98xuy10.08.2022 13:35
-
Ден225126.05.2023 02:50