Программирование. Стили программирования

p>                                proverka;

                               If hor = false Then hod;; end;

     while kol>0 do  {если колво хода игрока <1, то выход}

     begin

           writeln('осталось спичек - ',kol);

           k:=kol mod 11;

           if k=0 then k:=10;

           kol:=kol-k;

 

           clrscr;

                         write('я взял ',k,' спичек и осталось ',kol);

           if kol=0 then

           begin

                writeln;

                writeln(' Вы проиграли!!');

                x:=false;

                p:=p+1;

                readln;

                break;

 

           end;

           hod;

           kol:=kol-i;

           {если еще не подставили, то пробуем}

           proverka;

           If hor = false Then hod;

    end;

     If  x then

     begin

     writeln('ВЫ ПОБЕДИЛИ!!!!');

     v:=v+1;

     end;

     Writeln('Вы сыграли ',w,' раз (а), из них выиграли ',v,' и проиграли ',p,' раз.');

     Writeln('Хотите сыграть еще? (y-yes,n-no)');

     Readln(q);

     w:=w+1;

     Until q in ['n','N'];

     writeln(' нажмите enter для выхода ');

     readln;

end.

 

 

3. 2. Блок-схема процедуры.

procedure proverka.   {процедура проверяет числа}

 
3. Список литературы.

 

1. Академик А.П. Ершов. Предварительные  соображения о лексиконе программирования . – http://www.codenet.ru/progr/cpp/C-Style.php
2. Д. Гриса. Наука программировать. – http://www.finam.ru/dictionary/wordf02BDA/default.asp?n=32
3. Ф. Л. Бауэра. Язык широкого спектра. – http://allpasc.narod.ru/pascalbook/glav8.htm
4. Д. Кнута. Искусство программирования. – http://lectureroom.net/9.html
5. Шелест В.Д. Программирование. – СПб.: БХВ - Петербург, 2002. – 592 с.: ил.
6. Назаров С.В., Мельников П.П. Программирование на MS Visual Basic: Учеб. пособие / Под ред. Назарова. – М.: финансы и статистика, 2001. – 320 с.: ил.
7. Венц. Профессия – программист. – http://www.computer-museum.ru/books/n_collection/teaching.htm
8. Тарасов. Мир, построенный на вероятности. – http://kainsk.tomsk.ru/g2003/other22/hp.htm
9. Кормен. Алгоритмы. – www.vzshit.net.ru/index.php?id=8
10. Вирт. Алгоритмы + Структуры данных = Программы. – distance.ru/files/kursov/tech_programming.pdf