Заполните таблицу, выполнив перевод числа в указанные системы счисления.
 Двоичная 34
 Восьмеричная 23
 Десятичная 1В
 Шестнадцатеричная 110011

вот проверила, так работает. нормально?

program maxmin; var    a, b, c: integer;     max, min: integer; beginwriteln('введите три числа.'); read(a,b,c); {вводи числа через пробел}max: =a; if(b> max) then max: =b; if(c> max) then max: =c; min: =a; if(b< min) then min: =b; if(c< min) then min: =c; writeln('разность наибольшего и наименьшего чисел равна ',max-min); end.

program sir; var y,x,h: real; beginx: =280; h: =0.1; while h< =1 do  begin  y: =x*h;   writeln('цена за ',h*1000,' грамм ',y,' руб');   h: =h+0.1  end; end.

весь текст к бит к=7680 бит/с.* 90с =691200 бит

всего символов с   с=691200 бит/16бит=43200

всего страниц   ц   =ц=43200/400=108 с

таких тем много.

я предлагаю такие:

1) интересные события ( в мире, в стране, в

2) знаменитости и интересные факты о них.

3) все о писателях, поэтах и т.д.

4) наш дружный класс.

5) наш родной город.

6) наши одноклассники ( все о них)

7) наши учителя

вот к примеру такие. надеюсь тебе хватит)