<span>A16<span>=1010</span></span><span>E41A16=5839410</span><span>1816=18<span>10</span></span>
Var a:array[1..5,1..10] of integer;
b:array[1..5,1..10] of real;
i,max:integer;
begin max:=0;
for i:=1 to 5 do
for j:=1 to 10 do begin
read(a[i,j]);
if abs(a[i])> max then max:=a[i];
end;
for i:=1 to 5 do
for j:=1 to 10 do begin
b[i,j]:=a[i,j]/max
write(a[i,j]);
end;
end.
Компьютеры в интернете различают с помощью IP-адреса(<span>Интернет-протокол) который присваивается компьютеру при подключению к интернету.
Документы в интернете различают по их названию и типу файла</span>
Можно заменить на
read(x1,y2,x3,x4);