Дан двухмерный массив 5на5, числа генерируются от -10 до 10. нужно найти все четные числа, разделить их на 2 и вывести в паскале
gmejenny
3
06.12.2019 14:11
3
Другие вопросы по теме Информатика
leomax2
11.09.2019 09:00
MIRROR00000
11.09.2019 09:00
рттири
11.09.2019 09:00
avisuale
11.09.2019 08:23
alexeytutkevicp09cxb
13.06.2019 04:40
rfhbyf23690
08.07.2019 00:10
errreir
10.05.2021 12:13
Gerfat347
10.05.2021 12:13
Nargiza02005
10.05.2021 12:13
Популярные вопросы
- Напиши слова в правильном порядке и составь предложения. 1. any/...
1 - Решите методом интервалов неравенства: 1)(х+6)(х-1)(х-3,6) 02)(2х+1)(х-1)(х-2)...
3 - Повторение и закрепление Верных ответов: 2 650 – x = 240 : 6 x...
2 - 3 Сұрақтар мен тапсырмалар1. Өнеркәсіп қалдықтарының көбеюі,табиғи...
1 - У когонибцдь есть В. П. Р по русскоиу языку 6 класса 2 выриант,...
3 - Каким тебе представился правитель гуннов?...
1 - Тема:Герундий сделать 7 упражнений предоставленных в закреплённых...
2 - Санки скатываются с горки и затем останавливаються на горизонтальной...
2 - Near/the Sun? long/year?far away/the Sun? • short/year?• long/day?few/moons?short/day?составте...
3 - Вычислите: 2,13(7):0,5(3)...
3
const n=10;
var a: array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
a[i]:=random(251);
write(a[i],' ');
end;
writeln;
for i:=1 to n do
begin
if odd(a[i]) then a[i]:=2 else a[i]:=1;
write(a[i],' ');
end
end.