Procedure swap(var a, b: real);
var t: real;
begin
t := a;
a := b;
b := t;
end;
var a, b, c: real;
begin
readln(a, b, c);
if (a > b) then swap(a, b);
if (b > c) then swap(b, c);
if (a > b) then swap(a, b);
writeln(a, ' ', b, ' ', c);
<span>end.
===========================
Без процедур:
var a, b, c, t: integer;
begin
readln(a, b, c);
if (a > b) then
begin
t := a;
a := b;
b := t;
end;
if (b > c) then
begin
t := b;
b := c;
c := t;
end;
if (a > b) then
begin
t := a;
a := b;
b := t;
end;
writeln(a, ' ', b, ' ', c);
<span>end.</span></span>
В таких задачах идем с конца меняя знаки операций на противоположные, затем собираем алгоритм с конца меняя знаки операций:
50 / 2
25 - 1
24 / 2
12 / 2
6 / 2
3 - 1
2 / 2
1-1
0
Получим :21211121
1 бит. Т.к. всего цветов фигур 2, то i=1 бит.
Может быть мобильный телефон.
Ответ:
1)V=2Int,где 2-стерео,I - разрядность карты, n - частота дискретизации, t - время звучания.Значит V=2*16*10000*20=6400000 бит,делим на 8,затем на 1024 - 781,25 Кбайт
2)V=Int,I - разрядность карты, n - частота дискретизации, t - время звучания.Значит 22050 *10 *1 = 220500 байт(8бит - 1байт,а 22,05 из кГц переводим в Гц путем умножения на 1000)
3)V=Int,I - разрядность карты, n - частота дискретизации, t - время звучания.t = V/(n*I).Значит t = 5505024/( 22050 *2) = 124,8 сек(Мб переводим в байты,а кГц в Гц)
Объяснение: