Delphi: реальности программирования для смартфонов

3

Типы данных, как обычно, объявляются перед началом программы (до begin) используя инициацию var:

var

x,y:Integer;

m: Double;

n: Float;

str1:String; // Строковая переменная.

Mas: array [1…100] of String; // Массив одномерный из 100 строк, начало с 0

Ar: array [0..9] of array [0..9] integer; // Многомерный массив, начало с 0.

D: array of real; // Динамический массив

MyChar: Char; // Тип для хранения простого символа.

R: TRect; //Область, ограниченную R. Left, R. Up, R. Right, R.

Down.

Численные значения: Word, Integer, Doable, Float, Real; учитывая, что точность составляет 5—6 знаков, обычно используют Integer для целочисленных и Double для чисел с запятой, которые могут быть представлены также в формате Е: 3.14E+2 = 3.14E+00 = 3.14; 23.5Е-2 = 0.235. Для округления числа «x» удобно использовать Round (x), округляющий до ближайшего целого; также можно использовать для выделения целой части Trunk (x) и дробной части Frac (x).

Для ряда функций нужно добавить пакет math в User начала программы.

Доступны многие математические функции, в том числе: абсолютное значение abs (х), квадрат sqr (x) и корень квадратный из х: sqrt (x); для степенной функции преобразование: x

= exp (n*ln (x); корень n-й степени из x = exp (1/n*lnx). Имеется также функция возведения X

: Power (x,y):

var

Z: Real;

begin

Z:= Power (0.25, 0.5); {Z:= 0.5}

end;

Функция получения вероятногочисла: Random (n), по умолчанию пустые скобки () – вероятное число от 0 до 1; при «n» целочисленном – целочисленное значение от 0 до «n-1».

Символы представлены типом Char: Type: Char = #0..#255; Char:= «3». Код символа можно узнать по функции Chr (n). Код ANSI: #0…255. UNICODE: первые 256 символов = ANSI. Chr (66) = B; Char (67) = C.

var

myChar: Char;

begin

myChar:= «G»; // Назначение из символьной константы

ShowMessage («Символ G = ' + myChar); //Получаем «Символ G = G»

myChar:= #65; // Назначение из целочисленной константы

ShowMessage («#65 = ' + myChar); // Получаем «#65 = А»

end;

Присваивание значения требует двоеточия перед равенством: n:= 10; обычное равенство (=) используется в булевых значениях сравнения (true/false): if n = 10 then… Неравенство: X <> Y.

Массивы: важная часть программ для накопления данных. Могут быть:

– одномерные: Mas: array [1…100] of String; // все начинаются с 0.

– многомерныe: Ar: array [0..9] of array [0..