Var a,b,c:real;
begin
readln(a,b,c);
if (a<b+c) and (b<a+c) and
(c<a+b) then writeln('mojet') else writeln('ne mojet');
<span>end.</span>
16 * 64 = 1024 (2¹⁰)символов на странице
1024*16=16384 (2¹⁴)бит
16384:8=2048(2¹¹)байт
2048:1024=2кб
1 страница=2КБ
10 КБ : 2 КБ = 5 страниц
Var
a:array [1..12] of integer;
i,s:integer;
begin
writeln('vvedite 12 chisel');
for i:=1 to 12 do
readln(a[i]);
writeln('massiv');
for i:=1 to 12 do
write(a[i],' ');
writeln();
for i:=1 to 12 do
if abs(a[i])>15 then s:=s+1;
writeln('kolichestvo elementov = ',s)
end.
11100110=2^7+2^6+2^5+2^2+2^1=128+64+32+4+2=230
значок ^ означает степень(т.е 2^7, это 2 в седьмой степени)
Дано:
K=1024*512=524288
V=1,5 Мб * 1024=1536 Кб * 1024=1572864 байт * 8=12582912 бит
Найти:
N-?
Решение:
V=K*I
I=log₂N
N=2^i
I=V/K
I=12582912/524288=24 бит
N=2^24=16777216
Ответ: 16777216
//Мое условие отличается от данного Вами, потому что в Вашем была допущена ошибка, но я разобрался.