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