Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
masha1207
0 / 0 / 0
Регистрация: 20.10.2009
Сообщений: 108
#1

прокоментируйте?! - Turbo Pascal

17.05.2010, 22:31. Просмотров 254. Ответов 0
Метки нет (Все метки)

помогите с коментарием((
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
repeat
        C:=Readkey;
        case C of
          #60:
            begin
             if okon<=10 then
               begin
                    Okno(x,y,w,h,0);
                    x:=x+1;
                    y:=y+1;
                    w:=w-3;
                    h:=h-2;
                    Okno(x,y,w,h,4);
                    okon:=okon+1;
               end;
            end;
          #61:
             begin
               for i:=1 to okon do
                 begin
                   window(1,1,80,24);
                   gotoxy(81-i*2,i+1);
                   write(i);
                   gotoxy(2,2);
                 end;
             end;
        end;
   until C=#68;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.05.2010, 22:31
Здравствуйте! Я подобрал для вас темы с ответами на вопрос прокоментируйте?! (Turbo Pascal):

прокоментируйте решение - Pascal
прокоментируйте каждую(желательно) строку в решении. Наименьший элемент каждой строки матрицы, начиная со второй, замените наибольшим...

прокоментируйте - C (СИ)
Уважаемые программисты. Прокомментируйте программу(если быть более точным то мне не понятно int d и false, true ) #include &lt;iostream&gt; ...

Прокоментируйте код - C++
Моя первая программа не из учебника. Консольные шахматы без ИИ. Прошу оценить не интерфейс. И есть ли алгоритм определения мата не...

Прокоментируйте программу - C++
#include &lt;iostream.h&gt; #define pi 3.14159 class Rectangle; //Предварительное объявление класса class Circle{ float S; float R; ...

Прокоментируйте код - C++
со строки int t, t1 = 0, r = 0, t2; #include &quot;stdafx.h&quot; #include &lt;iostream&gt; #include &lt;locale&gt; #include &lt;iomanip&gt; #include...

прокоментируйте код) - C++
#include &lt;iostream&gt; #include &lt;vector&gt; using namespace std; typedef long long ll; const ll size=100; ll a,i,j,p,w,s,n; ...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.05.2010, 22:31
Привет! Вот еще темы с ответами:

Прокоментируйте код - C#
Написал лабу, суть создать структуру, и функции для работы с ней: (структура дата ДД/ММ/ГГ), должна уметь добавлять/ убирать один день,...

Прокоментируйте код - PHP
Помогите прокоментировать код. &lt;?php class cLogic { function pfOR ( $A , $B ) // return $A+$B дизюнкция; { return...

Прокоментируйте процедуру - Assembler
Всем доброго времени суток. есть процедура смысл которой непонятен, очень нужны коментарии что она делает: bcd_asc proc ...

прокоментируйте код - Delphi
procedure RemoveColumn(StringGrid1 : TStringGrid; ColNumber : integer); var Column : integer; begin ColNumber := abs(ColNumber); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.