Информатика 10 ! проходим case 2. дано число к. вывести фразу «мы выучили к правил» (1 - «1 правило», 12 – «12 правил», 22- «22 правила»).

Var k: integer; begin read(k); case k of *все цифры, оканчивающиеся на 1*: write('мы выучили  ',k,'  правило'); *все цифры, оканчивающиеся на 2, 3, 4*: write('мы выучили  ',k,'  правила'); else write('мы выучили  ',k,'  правил'); end; end.

Var k: ; begin read (k); case n of 1,21: writeln ('мы выучили'k' правило'); ,23,22,24 : ('мы выучили ,k, правила'); : ('мы выучил ,k,'правил'); 22: ( ну тут уже как выше); end; end. мы это ещё в 7-ом проходтли end.

16 Кбайт = 16*1024 байт = 16*1024*8 бит
Количество символов на странице = 40*60
Объем одной страницы = 40*60*8 бит
Количество страниц = 16*1024*8 / (40*60*8)  ≈ 6,8

С:папкиматематикаЗадача.doc

Нисколько, это рога.