1-верно
2-неверно
3-<span>верно
4-</span><span>верно
5-</span><span>верно
6-</span><span>верно
7-не</span><span>верно
8-не</span><span>верно
9-</span><span>верно
10-</span><span>верно
11-</span><span>верно
12-не</span><span>верно
13-</span><span>верно
14-</span><span>верно</span>
3,5Кбайт = 3,5*1024*8 бит = 28672 бита.
28672 / 4096 = 7 бит/знак
Вместо Х там должно быть 2
Uses
crt;
var
a, b, c: integer;
begin
clrscr;
writeln('Что вы хотите сделать?');
writeln('1-сложить 2-отнять 3-разделить 4-умножить');
readln(c);
if c = 1 then begin
read(a, b);
writeln(a + b)
end
else
if c = 2 then begin
read(a, b);
writeln(a - b)
end
else
if c = 3 then begin
read(a, b);
writeln(a / b)
end
else
if c = 4 then begin
read(a, b);
writeln(a * b);
end
else
write('Так, стоп, че за фигня? Где то тут меня надурили...');
readkey
end.
<em><u>Но короче и понятнее это написать так:</u></em>
uses
crt;
var
a, b, c: integer;
begin
ClrScr;
Writeln('Что вы хотите сделать?');
Write('1-сложить 2-отнять 3-разделить 4-умножить'); Readln(c);
if (c >= 1) and (c <= 4) then begin
Write('Введите через пробел два натуральных числа: '); Read(a, b);
case c of
1: Writeln(a + b);
2: Writeln(a - b);
3: Writeln(a / b);
4: Writeln(a * b)
end;
end
else Write('Так, стоп, че за фигня? Где то тут меня надурили...');
ReadKey
end.
Ответ:
основание=2
Ниже таблица, в ней показатель и сама степень:
0 1
1 2
2 4
3 8
4 16
5 32
6 64
7 128
8 256
9 512
10 1024
11 2048
12 4096
13 8192
14 16384
15 32768
16 65536
