Ответ а. єто докладно если .сто процентов
За 5 баллов в следующий раз никто программу не напишет вам
var mo,tu,we,th,fr,sa,su,a: ShortInt;
var b: Real;
Begin
Write('Температура воздуха в Понедельник: ');
Readln(mo);
Write('Температура воздуха во Вторник: ');
Readln(tu);
Write('Температура воздуха в Среду: ');
Read(we);
Write('Температура воздуха в Четверг: ');
Readln(th);
Write('Температура воздуха в Пятницу: ');
Readln(fr);
Write('Температура воздуха в Субботу: ');
Readln(sa);
Write('Температура воздуха в Воскресенье: ');
Readln(su);
a:=mo+tu+we+th+fr+sa+su;
b:=a/7;
Write('Средняя температура воздуха: ',b:0:2,' градусов.');
End.
33*40*64*8бит на символ = скоко аа
вес в битах
(кои-8 ето 8 бит на символ не 8символнасимвол)
1) "мир" становится в расширение
2) "Енисей" сдает назад
3) "Обь" и "Восток" проходят дальше прохода навстречу "Енисею"
4) "Мир" выходит из расширения
5) "Обь" и и " Восток" сдают назад к прооду
6) "Енисей" становится в проход
7) "Обь" и "Восток" проплывают проход
8) "Енисей" выходи из прохода