Помогите нарисовать блок-схему алгоритма для написанной в паскаль программы: - вопрос №5120361
Program Zadanie_2;
const n=3; m=4;
var Z: array[1..n, 1..m] ofinteger=((2,0,1,4), (4,4,-4,2),(-5,-5,-5,0));
zeroCols: array[1..m] of boolean;
i,j: integer;
begin
writeln ('Исходный массив:');
for i:=1 to n do begin
for j:=1 to m do
write (Z[i,j]:3);
writeln
end;
for j:=1 to m do begin
zeroCols[j]:=false;
for i:=1 to n do begin
if Z[i,j]=0 then zeroCols[j]:=true;
end;
end;
writeln ('Номера столбцов с нулевыми элементами:');
for j:=1 to m do begin if zeroCols[j] then write(j:3);
end;
writeln
end.
Добрый день. Меня заинтересовал ваш ответ "Вы ошиблись с разделом." на вопрос http://www.liveexpert.org/topic/view/5120361-pomogite-narisovat-blok-shemu-algoritma-dlya-napisannoj-v-paskal-programmi. Можно с вами обсудить этот ответ?
Задайте свой вопрос в резделе" Технологии".
Там точно вам ответят .
Добрый день. Меня заинтересовал ваш ответ "Здравствуйте, Андрей!
Задайте свой вопрос в резделе" Технологии".
Там точно вам ответ..." на вопрос http://www.liveexpert.org/topic/view/5120361-pomogite-narisovat-blok-shemu-algoritma-dlya-napisannoj-v-paskal-programmi. Можно с вами обсудить этот ответ?