генії! За правильну відповідь відмічу як найкращу! З фото відповісти на питання: 1)Скільки обʼєктів - id2145529220220204 от davleeva 04.02.2022 06:00

Question

Информатика: генії! За правильну відповідь відмічу як найкращу! З фото відповісти на питання: 1)Скільки обʼєктів розташовано на формі? 2)Скільки масивів опрацьовується в залачі? 3)Які обʼєкти розташовані на формі? А)Кнопка Б)Багаторядкове текстове поле В)Поле для уведення Г)Напис Д)Перемикач Е)Вікно програми 4)Вкажіть обʼєкт на формі Перше багаторядкове текстове поле 5)Вкажіть ВСІ обʼєкти Напис на формі

davleeva · Accepted Answer

Const nx=30;var i,j,p,n:integer;A:array[1..nx,1..nx] of integer;d,Sn,min:real;begin p:=1;write( Введите размер матрицы );Read(n);for i:=1 to n do beginfor j:=1 to n do beginA[i,j]:=random(3)-2;write(A[i,j]:4);end;writeln;end;writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif i = j then begin if A[i,j] 0 then p:=p* A[i,j];write(A[i,j]:4);endelse write( :4);end;writeln;end;write( p = ,p);writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif (i= n -j +1) then begin if A[i,j] 0...

MOGZ ответил