Тема одномерные массивы написать программу в паскале: 1.массив на 15 значений заполнен случайными числами посчитать количество нечетных значений 2.массив на 14 значений заполнен случайными числами второй сотни с точностью до десятых удалить все целые 3.массив на 17 значений заполнен целыми числами вставить перед каждым полендромом число 10
MariamAr81849
2
17.09.2019 04:30
0
Другие вопросы по теме Информатика
shkolnik1233
06.09.2019 23:20
ayselhasilova
06.09.2019 23:10
KaPitanKartoIIIka
06.09.2019 23:10
starikoe
06.09.2019 21:34
TomaSharik
06.09.2019 22:02
sweetcarpet258
06.09.2019 23:00
екатерина699
06.09.2019 23:00
никита4342
06.09.2019 23:00
Lotek
06.09.2019 23:00
Популярные вопросы
- Ежемесячные расходы Марии Петровны составляют 10 000 рублей. В текущем...
3 - Write about your family.ask and to write ...
1 - Написати твір на тему Дискусія Бездуховність людини, сенс людського...
2 - Які опади випадають із хмар а які з повітря?...
3 - Квадратное уравнение а) -3x^2+5x+12=0...
3 - Является ли мужик в Повести о том, как один мужик двух генералов прокормил...
1 - Які основні досягнення українських живописців епохи бароко?...
1 - Задачи по геометрии,решите...
3 - Найдите все целые числа, которые есть решением неверности. |x| 3;...
2 - 15 утвердительмых предлижений по англискому...
2
uses crt;
var
randomize;
i,s:byte;
a:array[1..15] of integer;
begin
for i:=1 to 15 do
begin
a[i]:=random(1000);
end;
for i:=1 to 15 do
begin
if odd(a[i]) then s:=s+1;
end;
writeln('ne4etnix 4isel-',s);
end.
как то так 1-я задача