Даны натуральное число n, символьная квадратная матрица порядка 10х14. Найти номер первого по порядку столбца, содержащего наименьшее число пробелов на пересечении со строками, номера которых четны — Pascal(Паскаль)

min:=n+1;
k:=1;
for j:=1 to m do
begin
 t:=0;
 for i:=1 to n do if (a[i,j]=' ') and (i mod 2 = 0) then inc(t);
 if t<min then
 begin
  min:=t;
  k:=j;
 end;
end;
writeln('Столбец ',k);

Похожие записи/страницы:

Leave a Comment

94 − 92 =