Построить логическую схему и таблицу истинности следующих функций: f=(avb)& (avb)va& b f=(avbvc)& (avbvc)& (avbvc)

1) F=(A+B)*(A+B)+A*B
    F=(A+B)+A*B
    F=A(1+B)+B
    F= A+B

A  B  F=A+B
0  0     0
0  1     1
1  0     1
1  1     1

2) F=(A+B+C)*(A+B+C)*(A+B+C)
    F = A+B+C

A  B  C    F=A+B+C
0  0   0        0
0  0   1        1
0  1  0         1
0  1   1        1
1  0   0        1
1  0   1        1
1  1   0        1
1  1   1        1

1)  var i,d,q:integer;
begin
d:=1;
for q:=5 downto 1 do {можно и for q:=1 to 5 do но у вашем примере идет на спад , я сделал так же}
d:=d+q;
writeln(q,' ',d);
end.

2) var i,d,q:integer;
begin
d:=1;
for q:=4 downto 1 do 
d:=d+q;
writeln(q,' ',d);
end.

3)   Здесь вовсе не нужен цикл , всеравно переменная станет 1(еденицей)
var i,d,q:integer;
begin
d:=1;
q:=1;
d:=d+q;
writeln(q,' ',d);
end.

4)  Будет зацикленость , поскольку не зименяется значение q (либо ошибка в условии)
А так как нет изменений то и переработать нельзя в цикл for

1) 108х40х56х2=483840 количество байт на страницах, +18х28+14х28х2=1792 дополнительные страницы, складываем это все получается...483840+1792=485632, переводим в мегобайты 0,46 мегобайт. 
(если есть вопросы по решению пиши)
2)1-бит вес одного символа, 2 бита в юникоде. 96х32х56=17203248х8х6=2304 количество символов которые отсуствует из-за иллюстаций. 172032-2304=169728 количество символов. Каждый рисунок весит 1.5 килобайта=1536 байт. 1536х6=9216 байт весят рисунки. 169728+9216=178944 байт, переводим в килобайты= 174,75 килобайт.