Заполнить двумерный массив размером 2 на 2.Значения элементов массива вводятся с клавиатуры. Посчитать и вывести на экран количество (число) ячеек массива которые были заполнены значениями 0.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
program HelloWorld;
var bb: array[1..2,1..2] of integer;
a: integer;
i: integer;
j: integer;
begin
a:=0;
for i:=1 to 2 do
for j:=1 to 2 do begin
read ( bb[i,j] );
end;
for i:=1 to 2 do
for j:=1 to 2 do begin
if bb[i,j]=0 then begin
a:=a+1;
end
end;
write (a) ;
end.
Объяснение: