Впишите формулу, устанавливающую связь мощности алфавита и информационного веса 1 символа из этого алфавита.

N=2ˣ
N - мощность алфавита
x - вес одного символа в битах.

#1:

begin

 var a,b,c,d:real;

 write('Введите стороны A B прямоугольника: '); readln(A,B);

 write('Введите стороны C D прямоугольника: '); readln(C,D);

 write('Площади прямоугольников ',(A*B = C*D)? 'равны':'не равны');

end.

#2:

begin

 var a,b,c:real;

 write('Введите стоимость трёх покупок: '); readln(A,B,C);

 write('Дисконтная карта ', ((B>A) and (C>A+B))? 'получена':'не получена');

end.

#3:

begin

 var AB,CD,MN: real;

 write('Введите длину отрезков AB,CD,MN: '); readln(AB,CD,MN);

 write('Отрезки ',(((AB+CD)>MN) and ((AB+MN)>CD) and ((CD+MN)>AB))? 'могут':'не могут', ' быть сторонами треугольника');

end.

#4:

begin

 var A,B:real;

 write('Введите сторону первого квадрата: '); readln(A);

 write('Введите площадь второго квадрата: '); readln(B);

 write('Площади заданных квадратов ', (A.Sqr=B)? 'равны':'не равны');

end.

Файл = в закрепе, также приложен скрин таблицы.

СТОЛБЕЦ ПРОЦЕНТ.

Нам нужно посчитать, сколько "%" одно число (кол-во набранных ) составляет от другого числа (макс. кол-во ).

Чтобы посчитать, сколько "%" одно число  составляет от другого, нужно первое число разделить на второе, и потом умножить на 100.

Здесь в формуле на 100 мы не умножаем, т.к. потом мы выбираем формат числа "процентный", и Excel сам умножает числа 0,8; 0,8; 0,85 на 100 соответственно и ставит знак "%".

Формула: D2=C2/B2 ⇒ выбираем формат "процентный"

СТОЛБЕЦ ОЦЕНКА:

В идеале, конечно, нужно знать диапазоны:

"% выполненной работы" - "оценка".

Но конкретно в Вашем случае я написал формулу для столбика "оценка" след. образом: E2=ЕСЛИ(D2=80%;4;ЕСЛИ(D2=85%;5)), потому что диапазоны с 0 до 100 "%" мне неизвестны, если что, подкорректируете.