1)Что выведет на экран данная программка? Var k, m: integer; Dat:

1)
Что выведет на экран данная программа?

Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1] := 12; Dat[2] := 15;
Dat[3] := 17; Dat[4] := 15;
Dat[5] := 14; Dat[6] := 12;
Dat[7] := 10; Dat[8] := 13;
Dat[9] := 14; Dat[10] := 15;
m := 0;
for k := 1 to 10 do
if Dat[k] = 15 then
begin
m := m+1;
end;
writeln(m);
End.

.....

2)
Чему равны элементы массива В?

var

B: array[1..5] of integer;

i:integer;

begin

for i:=1 to 5 do

if i mod 2 = 0 then a[i]:=5

else a[i]:=10;

end.



Изберите один или несколько ответов:
a. Все элементы массива имеют различное значение
b. Элементы равны 5 10 5 10 5
c. Сумма частей делится на каждый из элементов массива без остатка
d. Элементы одинаковы 10 5 10 5 10
e. Сумма частей массива делится на 15

......

3)
"разнотипных" "понятие" "значение номер суждение имя расположение однотипных

Массив - это совокупа "......" частей, имеющих общее "......"
, но у каждого свое "......" .