<em>// PascalABC.NET 3.2, сборка 1387 от 20.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(ReadSeqInteger(4).Min)
end.
<u>Пример</u>
4 5 6 7
4
АЦП--аналого-цифровой преобразователь. Применяется для
превращения аналогового (непрерывного) сигнала (звук, изображение, и т п) в цифровой код.
Нужен для того, чтобы цифровое устройство, например ПК, могло бы распознать аналоговую информацию.
Я думаю, что имеется в виду среднее по значению
Pascal :
var arr : array[0..2] of integer; { если числа целые }
i, j, t : integer;
begin
read(arr[0], arr[1], arr[2]);
// самый простой способ - это отсортировать массив
// в данном случае можно использовать сортировку "пузырьком"
for i := 0 to 2 do<span>
for j := 0 to 2 do
if arr[ j ] > arr[ j + 1]
begin
t := arr[ j ];
arr[ j ] := arr[ j + 1];
arr[ j + 1 ] := t;
end;</span><span>
//Конечно, среднее по значению число будет храниться в элементе arr[1]
writeln(arr[1]);
end.
На случай, если в учебнике просят среднее арифметическое, понятно, что нужно просто вывести ( arr[0] + arr[1] + arr[2] ) / 3
Если есть какие-то вопросы, то можете написать личное сообщение</span>
Для кодирования 16ти символов достаточно 4 бита, т.е. половина байта.
Значит 1 байт кодирует 2 символа.
30*1024*2 = всего символов в сообщении. Осталось поделить на 80
Тепловоз. (Стекло+ваза - убираем первую С, меняем К на П и А на О, убираем последнюю А)