Var i,s,k:integer;
begin
i:=11;
s:=0;
k:=0;
repeat
s:=s+i;
i:=i+1;
k:=k+1;
until i>20;
write ('Cреднее арифметическое чисел ОТ 11 ДО 20 равно: ', s/k)
end.
Var
x:real;
Begin
Write('x = ');ReadLn(x);
if x <= -12 then x:=-x*x
else if (-12 < x)and(x < 0) then x:=x*x*x*x
else x:=x-2;
WriteLn('y = ',x);
End.
Var
a,b,c:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
Write('c = ');ReadLn(c);
if (a<b)abd(b<c) then Write('Верно')
else Write('Неверно')
End.
V=4096 бит/с; t=10 с; I=40960 бит
40960 бит/5120 симв. = 8 бит/симв, т.е. 1 симв. =8 бит, значит мощность алфавита = 2 в 8 степени, т.е. 256
Ответ:256 символов
Думаю, что так:
элЕКТРичество, ЕКТР = трек
ЭЛЕКТРИчество = электрик
элекТРиЧЕСТВО = творчество
эЛЕКТРичествО = лектор
V = v * t, где
V - объем.
v - скорость передачи данных.
t - время.
1. Дано:
v = 128000 бит/с.
t = 120 с.
Найти: V.
V = v * t = (128000 * 120) / 2^13 = (2^7 * 1000 * 2^2 * 30) / 2^13 = (2^9 * 30000) / 2^13 = 30000 / 2^4 = 30000/16 = 1875 кбайт.
Ответ: 1875 кбайт.
2. Дано:
V = 60 мбайт.
v1 = 256 кбит/с.
v2 = v1 / 2 = 128 кбит/с.
Найти: t.
Так как файл передается по частям с разной скоростью, разделим объем напополам.
60 мбайт/ 2 = 30 мбайт.
Переведем в Кбиты:
30 мбайт = 8 * 30 = 240 мбит = 240 * 2^10 кбит.
Найдем сумму времени передачи первой части файла и второй:
t = V/v.
t = t1 + t2.
t = ((240 * 2^10) / 256) + ((240 * 2^10) / 128) = ((240 * 2^10) / 2^8) + ((240 * 2^10) / 2^7) = 240 * 2^2 + 240 * 2^3 = 240 * 4 + 240 * 8 = 960 + 1920 = 2880 с. = 2880 / 60 = 48 минут.
Ответ: 48 минут.
