AB
Anna Berry
Найти количество элементов, больших некоторого заданного числа X в каждой строке массива!
написать на листочке, так, как будем записывать в Turbo Pascal. помогите пожалуйста
написать на листочке, так, как будем записывать в Turbo Pascal. помогите пожалуйста
for y := 0 to h-1 do begin c := 0; for x := 0 to w-1 do if (a[ x, y ] > k) then inc(c); writeln( 'Row ', y, ' = ', с ); end;