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; begind: =1; q: =1; d: =d+q; writeln(q,' ',d); end.4) будет зацикленость , поскольку не зименяется значение q (либо ошибка в условии)а так как нет изменений то и переработать нельзя в цикл for
assistant
12.11.2021
1) 108х40х56х2=483840 количество байт на страницах, +18х28+14х28х2=1792 дополнительные страницы, складываем это все +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 килобайт.