40 лет назад Рей Томлинсон.
2)a,=Z(3)
3)<span>Z(a)=(b)
5)вывод a,'+',b,'='
6)вывод 'Z(',a,')=F(',b,')'
7)вывод 'a=',a,';b=',b,';'</span>
Сортировка методом пузырька:
const n=10;
Var a:array[1..n] of integer; i,j,b:integer;
Begin
for i:=1 to n do read(a[i]);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[j]<a[i] then
begin
b:=a[i];
a[i]:=a[j];
a[j]:=b;
end;
for i:=1 to n do write(a[i],' ');
End.
Var
a,b,h,x,f:real;
begin
Write('Введите a,b,h: ');
Read(a,b,h);
x:=a;
while x<=b do
begin
f:=sqrt(x)*sqr(cos(x));
Writeln(x:5:3,f:15:8);
x:=x+h
end
end.
Тестовое решение
Введите a,b,h: 0 3 0.25
0.000 0.00000000
0.250 0.46939564
0.500 0.54457910
0.750 0.46364281
1.000 0.29192658
1.250 0.11116410
1.500 0.00612832
1.750 0.04202995
2.000 0.24491094
2.250 0.59190315
2.500 1.01482406
2.750 1.41675413
3.000 1.69755726
var
a,b,h,x,f:real;
begin
Write('Введите a,b,h: ');
Read(a,b,h);
x:=a;
repeat
f:=sqrt(x)*sqr(cos(x));
Writeln(x:5:3,f:15:8);
x:=x+h
until x>b
end.
Тестовое решение
Введите a,b,h: 0 3 0.25
0.000 0.00000000
0.250 0.46939564
0.500 0.54457910
0.750 0.46364281
1.000 0.29192658
1.250 0.11116410
1.500 0.00612832
1.750 0.04202995
2.000 0.24491094
2.250 0.59190315
2.500 1.01482406
2.750 1.41675413
3.000 1.69755726
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 минут.