Какое значение будет выведено на экран после выполнения программного кода?
var
a: array [1..3,1..4] of real := ((111,12,3,4), (15,16,7,8), (9,0,11,12));
i, j, count: byte;
begin
count := 0;
for i:=1 to 3 do begin
for j:=1 to 4 do begin
write(a[i, j]:6);
if (a[i, j] > 9) and (a[i, j] < 100) then
count := count + 1
end;
writeln;
end;
writeln('count= ', count)
end.

  программную систему можно рассматривать как множество классов, позволяющих создавать, получать доступ и изменять коллекции данных, называемых объектами

вызов объектом компонента – основная базисная операция оо программирования

1)

германия берлин

греция афины

испания мадрид

польша варшава

франция париж

2)

греция афины

германия берлин

польша варшава

испания мадрид

франция париж

1)котят 7

2)рыжих котят 5

3)зелоноглазых котят 3

4)котят рыжих и зеленоглазых 3

5)котят рыжих или зеленоглазых 3

6)рыжих и не зеленоглазых котят 3

7)не рыжих и не зеленоглазых 1

var a: array [1..10] of integer;

i,k: integer;

begin

  read(a);

  k: =1;

  for i : = 1 to 10 do

  begin

        if a[k]> a[i] then k: =i;

  end;

  if k mod 2 = 0 then writeln(k," - chetnoe")

  else writeln(k," - ne chetnoe");

end.