Ответ:
вот,думаю правильно, все на картинке написано
256 = это из 16 10 или 8 ричная системы?
а16 = 2582
ав = 10101011
const
n=10;
var
a:array [1..n] of real;
z,i,k:integer;
begin
for i:=1 to n do
begin
write ('A[',i,'] = ');readln(a[i]);
end;
write ('Z = ');readln(z);
for i:=1 to n do
if a[i]>z then begin
a[i]:=z;
k:=k+1;
end;
for i:=1 to n do
if frac(a[i])=0 then write (a[i]:0:0,' ') else write (a[i]:0:1,' ');
writeln ('Kol-vo zamen: ',k);
readln;
end.
Один из наименее известных языков програмирования,используется для обучения програнированию в старших классах и на первых курсах вузов.
23 в двоичной 10111
3 в двоичной 11
2003 в двоичной 1111010001