Паскаль. В двумерном массиве (5 на 5) подсчитать количество нулевых элементов , а ко всем отрицательным числам " прибавить" символ * т.е. выводится табличка массива, если число отрицательное ( например -3), то оно выводится с символом * (получается -3*) , потом ещё выводится количество нулевых элементов.
const
n=5;
var
a:array [1..n,1..n] of integer;
i,j,count:integer;
begin
count:=0;
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(101)-50;
if a[i,j]<0 then
write(a[i,j],'* ')
else write(' ',a[i,j],' ');
if a[i,j] = 0 then inc(count);
end;
writeln;
end;
writeln('Count:',count);
end.