Так, адача похожая на предыдущую
Переведем килобайты в биты:
100 килобайт * 1024 байта в килобайте = 102400 байт.
переведем в биты:
102400 * 8 бит в байте = 819200 бита в сообщении.
Добавим избыточность. Нам по условию надо добавить 20% информации
819200*1.20 = 983040 бит надо передать.
Рассмотрим пропускную канала
10 мегабит\секунду. переведем в килобиты:
10*1024 килобит в мегабите = 10240 килобит в секунду.
переведем в биты в секунду = 10240*1024 = 10485760 бит в секунду
разделим, чтобы определить время:
983040 бит / 10485760 бит в секунду = 0.09375 секунд
ответ: 0.09375 секунд
1)
begin
var (f, m) := readinteger2;
var s := 4 * sqr(f) - sqrt(25) + 12 * m;
write(s);
end.
2)
begin
var (z, h, n) := readinteger3;
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25);
write(v);
writeln('Выполнил: ВАШЕ ФИО');
end.
Объяснение:
sqr(x) - возводит число х в квадрат;
sqrt(x) - вычисляет квадратный корень из числа x;
abs(x) - вычисляет модуль числа х.
1)
begin // Начало программы
var (f, m) := readinteger2; // Считываем с клавиатуры значения f и m
var s := 4 * sqr(f) - sqrt(25) + 12 * m; // Вычисляем выражение
write(s); // Выводим ответ
end. // Конец программы
2)
begin // Начало программы
var (z, h, n) := readinteger3; // Считываем с клавиатуры значения z, h и n.
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25); // Вычисляем выражение
write(v); // Выводим ответ
writeln('Выполнил: ВАШЕ ФИО'); // Здесь вводите свое ФИО
end. // Конец программы
