С ИНФОРМАТИКОЙ ДАЙТЕ ТОЧНЫЙ ОТВЕТ - id1638649920200708 от nicecherry23 08.07.2020 04:36

Question

Информатика: С ИНФОРМАТИКОЙ ДАЙТЕ ТОЧНЫЙ ОТВЕТ​

nicecherry23 · Accepted Answer

Program matr; uses crt; const m=(число); n=(число); var a:array[1..m,1..n] of integer; i, j:integer; max:real; k:boolean; function prost(x:integer):boolean; begin prost:=false; if x 0 then if (x=1) or (x=2) then prost:=true else for i:=2 to x-1 do if mod(x, i) =0 then prost:=true; end; begin clr scr; for i:=1 to m do begin for j:=1 to n do begin write( a[i,j] = ); read(a[i, j]) end; writeln end; max:=abs a[1,1]; k:=false; for i:=1 to m do for j:=1 to n do begin if abs(a[i, j]) abs(max) then max:=...

С ИНФОРМАТИКОЙДАЙТЕ ТОЧНЫЙ ОТВЕТ​

MOGZ ответил

С ИНФОРМАТИКОЙ
ДАЙТЕ ТОЧНЫЙ ОТВЕТ