Информатика, 9 класс
Готов
Вопрос от 2283 дня назад
Составьте программу,которая формирует массив из шестнадцати случайных целых чисел от -20до20 и: б)находит индексы четных элементов
Ответ от
program HelloWorld; uses crt; var a:array[1..16] of integer; i:integer; begin for i:=1 to 16 do begin a[i]:=random(41)-20; write('a[',i,']=',a[i],' '); end; writeln; writeln('Индексы чётных элементов'); for i:=1 to 16 do begin if i mod 2=0 then write('a[',i,']=',a[i],' '); end; end.