Компания по снабжению электроэнергией взимает плату с клиентов по тарифу: k1 рублей за 1 квт/ч за первые 500 квт/ч; k2 рублей за 1 квт/ч, если потребление свыше 500 квт/ч, но не превышает 1000 квт/ч; k3 рублей за 1 квт/ч, если потребление свыше 1000 квт/ч. составить ведомость оплаты за электроэнергию каждым клиентом. табличка в excel

21 24 27 30 33 36 39 42 45 48 

составим двоичную матрицу:

                        молоко       лимонад         квас                   вода

бутылка               0                   1                 0                     0

стакан                 0                   0                 0                     1

кувшин                 1                   0                 0                     0        

банка                   0                   0                 1                     0

в кувшине - молоко

в бутылке - лимонад

в банке - квас

в стакане - вода

program ssd;

  uses crt,graph;

  var       d,m: integer;

  begin

  clrscr;

  initgraph(d,m,'');

  arc(200,200,360,180,50);

  line(150,200,250,200);

  readkey; closegraph;

  end.

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

что то вроде такого)