===== PascalABC.NET =====
procedure pK(n: integer; var k: int64);
begin
k := 1;
for var i := 2 to n do
k *= i
end;
function fK(n: integer): int64;
begin
Result := 1;
for var i := 2 to n do
Result *= i
end;
begin
var n := ReadInteger('n =');
var r: int64;
pK(n, r);
Println('Процедура:', r);
Println('Функция:', fK(n))
end.
Найдем кол-во бит в одном пикселе:
4=2^x
x=2
Объем видеопамяти = 320*240*2=153600 бит=19200 байт = 18,75 Кбайт
1) синоним к слову благо - польза.
2) устройство для прослушивания звука - наушники.
3) сенсорный переносной компьютер - планшет.
4) устройство для записи звука - диктофон.
Ответ:B-1=8 B-2=5 B-3=6 B-4=9
Объяснение:
B-1:
А-1
Б-1
Е-1
Д-3
В-1
Г-4
Ж-4
З-8
B-2:
А-1
Б-1
Д-1
Е-1
В-2
Г-3
Ж-2
З-5
В-3:
A-1
B-3
D-2
E-1
C-3
F-1
G-3
H-6
B-4
A-1
E-1
D-2
B-2
C-4
F-3
G-5