Массив C размером 15 заполняется случайными числами из интервала (0,100). Вывести на экран нечётные элементы массива.
krol4atka:
Какой язык программирования
Ответы
Ответ дал:
1
Ответ:
var i :integer;
C: array[1..15] of integer;
begin
write('Массив С: ');
for i := 1 to 15 do
begin
C[i] := random(0, 100);
write(C[i], ' ');
end;
writeln();
write('Нечётные элементы массива: ');
for i := 1 to 15 do
begin
if C[i] mod 2 <> 0 then write(C[i], ' ');
end;
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад