Перевести длину, заданную в дюймах, в сантиметры (10 дюймов = 254 мм).

и среднее значение.
2. В одномерном массиве произвольных чисел вычислить среднее арифметическое значение квадратов положительных элементов.
3. напечатать числа следующим образом
14 10.4
15 11.4
...
27 25.4
Помогите пожалуйста, скоро зачет, надо все сдать

единиц. Если таких чисел несколько, укажите наибольшее из них. 1) 6310 * 410 2) F816 + 110 3) 3338 4) 111001112

элементов А,В,С, т.е. Di=MAX{Ai,Bi,Ci}. Нахождение максимального значения оформить в виде подпрограммы.а вот подпрограмма:

Procedure FindMax(A,B,C:real; Var D:real);
Begin
if (A>B)and(A>C) then D:=A;
if (A<B)and(B>C) then D:=B;
if (C>B)and(A<C) then D:=C;
End;
Var
A,B,C,D:array[1..10] of real;
i:integer;
Begin
Write('A: ');
For i:=1 to 10 do
Begin
A[i]:=random(100)-25;
Write(A[i],' ');
End;
WriteLn;
Write('B: ');

закодировать букву Г, чтобы длина кода была минимальной и допускалось однозначное разбиение кодированного сообщения на буквы?
1) 1 2) 1110 3) 111 4) 11
--------------------------------------------------------
Здравствуйте, почему ответах правильный ответ под цифрой - '3'? Если для 1 варианта ответа, выполняется обратное условие Фано(в теории надо, что бы хотя бы одно из правил Фано выполнялось), и оно является минимальным. Спасибо!