Есть ответ 👍

Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы массива с нечётными значениями

145
343
Посмотреть ответы 2

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


var

a: array [1..10] of integer;

i: integer;

begin

randomize;

for i: =1 to 10 do begin

a[i]: =random(20)+1;

write (a[i],' ');

end;

writeln;

for i: =1 to 10 do

if odd(a[i])=true then write (a[i],' ');

readln;

end. 


Удалите и заново установите телеграм ,мне

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