можно обойтись без массива и этим память компьютера.
можно также вывести такую матрицу (в виде песочных часов) любого размера. для этого нужно только изменить значение n в строке
const n=5
program pentelemon; uses crt; const n=5; var i,j: integer; begin writeln('*** alphaues is ***'); writeln('*** ok ***'); writeln(); for i: =1 to n do begin for j: =1 to n do begin if ((j> =i) and (i+j< =n+1)) or ((j< =i) and (i+j> =n+1)) then write ('1 ') else write ('0 '); end; writeln(); end; end.
program vovka9673; uses crt; const n=5; var nm: array[1..n,1..n] of integer; i,j: integer; begin writeln('*** alphaues is ***'); writeln('*** ok ***'); writeln(); for i: =1 to n do begin for j: =1 to n do begin nm[i,j]: =i*100+j-1; write (nm[i,j]: 5) end; writeln(); end; end.
Поделитесь своими знаниями, ответьте на вопрос:
Люди добрые, , экран компьютера может поддерживать 16 цветов и отображать на экране 640 точек по горизонтали и 350 точек по вертикали. определить разрешающую способность экрана, количество бит на точку, информационный объём экрана