Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы массива с нечётными значениями
ilonazelen
2
30.09.2019 10:30
0
Другие вопросы по теме Информатика
npapriko
05.05.2022 11:54
89836331552
23.04.2020 14:51
sergazinaaidana1
23.04.2020 14:51
mam40
04.10.2019 10:41
lizavolod17
04.10.2019 10:41
lyudagrigoreva2
04.10.2019 10:41
ilyapleshakov29
22.07.2019 15:50
ЕвгешаК2003
21.12.2020 13:21
Популярные вопросы
- Поставьте в соответствие этапы создания трехмерных объектов....
1 - Составьте формулы следующих соединений: натрия с кислородом,хлора(v||)*...
3 - Скільки часу триває покривання виробц шаром нікелю масою 1,8...
2 - Решите ) сумма квадратов двух последовательных натуральных чисел...
3 - 99 -найдите средства выразительности, мы под защитой дианиной,...
1 - Какая самая длинная река великобритании...
3 - Придумайте предложения по схемам...
2 - Написать сочинение на тему нищей щенок или нищий котенок используя...
3 - 2. объём прямоугольного параллелепипеда равен v смһ см. задайте...
3 - Тело свободно падает с высоты 50м.на какой высоте от поверхности...
3
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.