Вывести на печать четные элементы таблицы.если элемент mod=0, то печатай элемент. (двумерная)
kkkddd90
3
17.03.2019 21:10
1
Другие вопросы по теме Информатика
conyp2005
20.07.2019 02:30
пецааааа1
18.12.2021 07:11
цветочек751
18.12.2021 07:09
ivan70region
29.01.2021 14:03
Асия22222
19.09.2019 18:01
vika737722
19.09.2019 18:00
Dasha5901
19.09.2019 18:00
oleg173173173
19.09.2019 17:59
evelina2023
13.09.2019 12:20
Популярные вопросы
- Скільки коренів має квадратний тричлен 5x²-7x+2?...
3 - Хотим закрасить такую стену: a) Какое поле А стены? ( ответ запишите к сотым)...
2 - Какое изобразительно- выразительное средство языка А. Т. Твардовский использует...
3 - Знайти зміну внутрішньої енергії 200г кисню (O2), який охолодили від100°C до...
2 - (a-b)³-3(a-b)² какой будет ответ...
3 - 6. Перепишіть, розкриваючи дужки. 1. (3) ранку почалася справжня осінь (П. Загребельний)....
1 - Я бы хотел на соревнованиях по плаванию занять первое или второе место....
3 - Визначте скільки років Коропу...
2 - Y=3x/x^2+1 Исследовать функцию и построить график...
3 - Смешали 5 моль метана и 25 моль воды . определите массовую долю метанода в растворе...
1
var
a:array[1..10,1..10] of integer;
i,j:integer;
begin
for i:=1 to 10 do
for j:=1 to 10 do
a[i,j]:=random(51);
for i:=1 to 10 do
for j:=1 to 10 do
if (a[i,j] mod 2=0) then write(a[i,j]);
end.