Function oddcount(ar:array[1..n;1..m] of integer):integer;
var i,j:integer;
begin
result:=0;
for i:=1 to n do
for j:=1 to m do
begin
if odd(ar[i,j]) then
result:=result+1;
end;
writeln(result);
end;
Вот так как-то.

0 0

4 года назад

1)чем исчислялось количество ЭВМ первого покаления2)Для чего предназначена оперативная память?3)Какую структуру имеет иерархичес

lossa [38]

1) какой то вопрос неполный, ну может комнатами))

0 0

4 года назад

ПОМОГИТЕ ПОЖАЛУЙСТА СДЕЛАТЬ 1 И 2 ЗАДАНИЯ.

Vova163

1 В столбце е пиши =(a1+B1)*(c1+d1) enter, а потом значит вниз протяни на все строки
2 =(a1/B1) *(c1/D1)

0 0

3 года назад

К корню приклей суфикс, к суфиксу окончание так что бы получильсь слова ........+ оньк + ого = ........ ........+чн+ая = .......

Виталий Тристень

Лёгонького,
Речной,
Лесник

0 0

4 года назад