Сделать программу в паскале по вычислению сколько рулонов нужно потратить на одну стену и сколько это будет стоить. нужно ввести будет ширину и длину стенв, а также, ширину, длину и стоимость одного рулона обоев

var

a, b, a1, b1, cost, w, h: integer;

begin  readln(a, b, a1, b1, cost);   w : = a div a1;   if a mod a1 < > 0 then inc(w);   h : = b div b1;   if b mod b1 < > 0 then inc(h);   writeln(w * h);   writeln(w * h * cost); end.

24 * 32 = 768 символов на 1 странице

768 * 12 = 9216 символов на 1 странице

9216 * 1 = 9216 байт в буклете

9216 * 8 = 73728 бит в буклете

                                                              алгоритм перехода улицы по свотофору

1.посмотреть какой цвет на светофоре

2.если зеленый то посмотреть направо 

3.посмотреть налево

4.если машын нету, то начать переходить

5.дойти до островка и снова  посмотреть направо и налево и перейти дорогу

                                                                  алгоритм посадки дерева

1.взять лопату и выкопать ямку, положыть лопату

2.взять садженец и поставить его в ямку

3.взять ведро и полить садженец, положыть ведро

4.взять лопату и закопать садженец, положыть лопату

5.взять ведро и полить садженец, положить ведро