N=15 i=4 бит/1сим
1024*4=4096 бит
2^12/2^3=2^9=512 байт
2^12/2^12=0.5 Кбайт
Это в паскале
var
a,b:real;
begin
write('Введите первое число - ');
readln(a);
write('Введите второе число - ');
readln(b);
if a=b then writeln(a,'=',b)
else
if a>b then writeln(a,'>',b)
else writeln(b,'>',a);
<span>end.</span>
1.голова
2.оперативная,вербальная,внутренняя память.
3.долговременная память,приемник.
4.база данных,магнитные носители,оптические носители,лазерные
var a,b: array[1..10] of Integer;
i,n: integer;
begin
n:=1;
for i:=1 to 10 do readln(a[i]);
for i:=1 to 10 do
begin
if a[i]<>0 then
begin
b[n]:=a[i];
inc(n);
end;
end;
if n=1 then writeln('Элементов нет') else
for i:=1 to n-1 do writeln(b[i]);
end.
Кенгуру-в длину 6-10м,в высоту-до 3м
Тигр-4-5м
Долгоног-3-5м
Снежный барс-в высоту 3-4м
Антилопы,олени,зубр,страус -в высоту 2м
Озерная лягушка-в длину 1м
Зелёный кузнечик-в длину 2м