Винформатике имеется файл с текстом из 18000 символов. при наборе текста использовался компьютерный алфавит. текст необходимо скопировать на диск, на котором имеется свободная область памяти 16 кбайт. поместится текст на диск? нужно решение) )

Не понятно что такое компьютерный алфавит. что это за кодировка? пусть 1 символ занимает i бит 18000 * i бит / 8 / 1024 = 2.197265625 * i кбайт если i = 8 бит => 2.197265625 * 8 кбайт = 17.578125 кбайт > 16 кбайт - не влезет если i = 7 бит => 2.197265625 * 7 кбайт = 15.380859375 кбайт < 16 кбайт - влезет  

pascal:

 

program strings;

uses crt;

var i,open,close: integer;

a: string;

begin

open: =0;

end: =0;

clrscr;

write('введите строку: '); readln(a);

for i: =1 to length(a) do

begin

if a[i]='(' then open: =open+1;

if a[i]=')' then close: =close+1;

end;

 

writeln('открывающихся скобок: ', open, ' штук');

writeln('закрывающихся скобок: ', close, ' штук');

readln;

end.

1+2+3+4+5+6+7+8+9+10+11+12=78

78: 2=39

делим так, чтобы в обеих частях сумма чисел была 39. для этого линия раздела должна проходить между 3 и 4, а также между 9 и 10. в одной половине 10+11+12+1+2+3=39 и в другой 4+5+6+7+8+9=39

разложим 78 на простые множители:

78 | 2

39 | 3

13 | 13

  1

так как на циферблате всего 12 чисел, получаем, что его ещё можно разделить на 3 и на 6 частей, чтобы суммы чисел в частях были равны:

78: 3=26 (11+12+1+2=26, 9+10+3+4=26, 5+6+7+8=26)

78: 6=13 (12+1=13, 11+2=13,10+3=13, 9+4=13, 8+5=13, 7+6=13)