Var x,f:real;
begin
writeln('x');
readln(x);
f:=1/(x-6);
x:=4*x;
writeln(f:5:2);<span>writeln(x:5:2);end.</span>
Так :)
program p1;
var a:integer;
begin
writeln('Введите число: ');
read(a);
writeln('число: ',a);
<span>end.</span>
1) 1 Килобайт = 1024 Байтов
1 Мегабайт = 1024 Килобайтов (1024 Б * 1024 Б)
=> 1572864 : 1024 = 1536 КБ (Килобайт)
(1536 ←(1572864 Б) : 1024 = 1,5 МБ ⇔ Окончательный ответ)
2) 1 Байт = 8 Битов
=> 20480 : 8 = 2560
20480 Бит = 2560 Байт
(2560 ←(20480 Бит): 1024 = 2,5 КБ ⇔ Окончательный ответ )
3) 4194304 Байт = 4096 Кб
(4096 Кб = 4 Мб ⇔ Окончательный ответ)
4)40960 Бит = 5120 Байт
(5120 Байт = 5 Кб ⇔ Окончательный ответ)
5) 3145728 Байт = 3072 Кб
(3072 Кб = 3 Мб ⇔ Окончательный ответ)
6) 155648 Бит = 19456 Байт
(19456 Байт = 19 Кб ⇔ Окончательный ответ)
1) 500 КБ =5*25*4*2^13 бит = 125*2^15 бит
2) 16 секунд=2^4 cекунд
3) (125*2^15) / (2^4)=125*2^11 бит/с
4) 256=2^8 --> 8 бит разрядность звуковой платы; 8=2^3
5) 125*2^11 / 2^3 = 125*2^8 (1/c) = 31,25 *2^10 (Герц)=
=31б25*1024/100 = 32 кГерц <-----ответ
( на практике частота дискретизации в звуковых системах равна
44,1 кГ (Audio CD) 48 кГ (DVD) 22,05 (радио) )