Информатика, 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 a[i]=0 then write('a[',i,']=',a[i],' '); end; end.