разберем предложение "чернила на 99% состоят из воды" по количеству символов в каждом слове: - "чернила" - 7 символов - " "(пробел) - 1 символ - "на" - 2 символа - " "(пробел) - 1 символ - "99%" - 3 символа - " "(пробел) - 1 символ - "состоят" - 7 символов - " "(пробел) - 1 символ - "из" - 2 символа - " "(пробел) - 1 символ - "воды" - 4 символа значит всего символов: 7 + 1 + 2 + 1 + 3 + 1 + 7 + 1 + 2 + 1 + 4 = 30 если каждый символ кодируется одним байтом, значит информационный объем предложения равен 30 байтам. ответ: 30 байт
L = 109;
var
v, t, s: real;
n: integer;
begin
Write('Введите скорость Васи, км/ч: ');
Readln(v);
Write('Введите время в пути, ч: ');
Readln(t);
s := abs(v) * t;
n := trunc(s);
if s > n then n := n + 1;
n := n mod L;
if v > 0 then Writeln('Вася остановился на ', n, ' км.')
else Writeln('Вася остановился на ', L - n - 1, ' км.')
end.
Тестовое решение:
Введите скорость Васи, км/ч: 85.4
Введите время в пути, ч: 1.5
Вася остановился на 20 км.