var a:array [1..100] of real;
i,n:integer;
t:real;
Begin
randomize;
n:=20;
for i:= 1 to n do begin
a[i]:=random(n*10)- 10*n div 2 ;
write(a[i]:4);
if i mod 10=0 then writeln;
end;
t:=a[1]
for i:= 1 to n do begin
a[i]:=a[i]/t ;
write(a[i]:4);
if i mod 10=0 then writeln;
end;
End.
Ответ:
как то вот так
Объяснение:
в первом ничего т.к. они не используют ничего
ты ток аккуратнее нарисуй
10100110100111001 <span> в двоичной
</span>246471 <span>восьмеричной
</span>14D39 <span>шестнадцатеричной</span>
271 (10) = <span>100001111 (2) , 417 (8) , 10F (16)
43 (10) = </span><span>101011 (2) , 53 (8) , 2B (16)
271 (10) + 43 (10) = </span><span>314 (10) ,100111010 (2) , 472 (8) , 13A (16)</span>
2d. Идентификатор не должен начинаться с цифры!