1.Запишіть цифрою кількість об’єктів схеми Шеннона, яка є моделлю отримання й передавання інформації у вигляді закодованих повідомлень від джерела до приймача.2.Запишіть назву вкладки меню, яка дозволяє додати на слайд презентації кнопку дії?

var tl, tp, l, p: real;

     el, n: integer;

begin

print('Время, за которое лифт передвигается на 1 этаж');

readln(l);

print('Этаж, на котором находится лифт');

readln(el);

print('Время, за которое Катя поднимается на 1 этаж');

readln(p);

print('Нужный этаж');

readln(n);

tp := (n - 1) * p;

tl := (el + n - 2) * l;

println('Время на лифте:', tl);

println('Время по лестнице:', tp);

if tp > tl then

println('На лифте быстрее')

else

 if tp < tl then

 println('По лестнице быстрее')

 else

 println('Нет разницы');

end.