
- •1.1 Оформление программы
- •1.2 Переменные и константы
- •1.2.1 Типы
- •1.2.2 Записи (структуры)
- •V: real; // 2-я переменная, скорость
- •Var // Служебное слово для обозначения
- •1.2.3 Массивы
- •Int s[10]; // Определение массива с
- •1.2.4 Локальные и глобальные переменные
- •Implementation // Определяет внешнюю видимость этого
- •I: integer; // объявление локальной внутри процедуры
- •I:integer; // переменных, в том числе «I»
- •Void __fastcall tForm1::Button1Click(tObject *Sender)
- •Int I; // объявление локальной внутри процедуры
- •1.3 Указатели
- •I:integer;
- •Inc(k,2); // перемещение указателя вперед на 2 длины
- •1.4 Команды
- •1.5 Пользовательские процедуры и функции
- •Void __fastcall tForm1::Button1Click(tObject *Sender)
- •Int n1,n2; // объявление локальных переменных
- •1.6 Объекты программы
- •Void __fastcall tForm1::Button1Click(tObject *Sender)
- •1.7 Пример программы пользователя
- •1.7.1 Постановка задачи
- •1.7.2 Подготовка формы
- •1.7.3 Алгоритм программы
- •1.7.4 Последовательность разработки программы
- •1.7.5 Программа в Delphi
- •Interface // Определяет внешнюю видимость этого модуля
- •Implementation
- •2Перемещение объектов по форме
- •2.1 Общие сведения
- •2.1.1 Изменение положения объектов на форме
- •2.1.1.1Подготовка формы
- •2.1.1.2Блок-схема программы
- •2.1.1.3Листинг программы в среде Delphi:
- •Interface
- •Implementation
- •Void __fastcall tForm1::Button1Click(tObject *Sender)
- •Void __fastcall tForm1::Timer1Timer(tObject *Sender)
- •2.1.2 Расчет положения объекта на форме по физическим координатам моделируемого объекта
- •2.1.3 Расчет координат связанных объектов
- •2.2 Дифференциальные уравнения
- •2.2.1 Дифференциальные уравнения движения
- •2.2.2 Методика решения дифференциальных уравнений движения
- •2.2.3 Алгоритмы управления движущимся объектом
- •Xmax, Ymax, Dx, Dy: real;
Int s[10]; // Определение массива с
// именем S, состоящего из
// 10 элементов целого типа
// с индексами с 0 по 9
TTelegka MTelegka[20]; // Определение массива с
// именем MTelegka, состоящего из
// 10 элементов типа TTelegka
// с индексами с 0 по 9
Доступ к конкретному элементу массива осуществляется с помощью индекса. На языке Pascal:
S[2] := 10; // Элементу массива S c индексом 2
// присваивается значение 10
MTelegka[i].v := 1.5; // Переменной v записи MTelegka с
// индексом по значению переменной i
// присваивается значение 1.5
На языке C++:
S[2] = 10; // Элементу массива S c индексом 2
// присваивается значение 10
MTelegka[i].v = 1.5; // Переменной v записи MTelegka с
// индексом по значению переменной i
// присваивается значение 1.5
Необходимо отметить, что на языке Pascal начальный индекс массива указывается пользователем и может быть любым. В то же время в C++ индекс массива всегда начинается с 0. Поэтому в этом случае максимальный индекс массива равен длине массива минус 1.
1.2.4 Локальные и глобальные переменные
Программа в общем случае состоит из набора процедур и функций, вызываемых при заранее определенных событиях, или пользователем при написании программы. В свою очередь каждую процедуру либо функцию можно рассматривать как отдельную программу со своим именем, своими переменными и константами. При этом имеет смысл разграничить области действия (и существования) некоторых переменных только в пределах этих подпрограмм. Например, если в конкретной подпрограмме используется переменная «i» в качестве счетчика цикла, то ее лучше объявить как локальную, действующую только в пределах этой подпрограммы. Тем самым экономится ОЗУ компьютера, так как переменная уничтожается при выходе из подпрограммы. С другой стороны, это же имя «i» можно будет использовать для объявления другой локальной переменной в другой подпрограмме. Если требуется хранение данных, доступных из любой подпрограммы пользовательской программы, то такие переменные объявляются глобальными и, соответственно, такое имя уже считается зарезервированным и недоступным для других переменных.
Пример объявления глобальных и локальных переменных и констант в программе в среде Delphi:
...
var
Form1: TForm1; // Объявление глобальной переменной
// Form1 – текущая форма программы
Revers: boolean; // Объявление глоб. переменной Revers
// логического типа
const
Pi : real = 3.14159265; // Объявление глобальной константы
// типа с плавающей запятой
Implementation // Определяет внешнюю видимость этого
// модуля
{$R *.dfm}
// Процедура, вызываемая при нажатии кнопки Button1 на форме
procedure TForm1.Button1Click(Sender: TObject);
var
I: integer; // объявление локальной внутри процедуры
// переменной «i»
const
A : array [0..9] of char = ('0','1','2','3','4','5','6','7', '8','9'); // объявление локального массива констант
begin // начало процедуры
for i:=0 to 10 do
begin
end;
end; // конец процедуры
// Функция пользователя
function Polozenie ():real;
var
a,b,c:real; // объявление локальных внутри процедуры