Регистрация
lizasyper6
15.11.2020 14:59
Информатика
Есть ответ 👍

Как выглядит пиктограмма Edit?​

296
348
Посмотреть ответы 2

Ответы на вопрос:

Егорка8374
Егорка8374
4,7(5 оценок)
ответ вариант 2 скорее всего
dmitrius2
dmitrius2
4,7(67 оценок)

ответ:

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

Популярно: Информатика