Pascal Next – руководство программиста. Описание языка программирования с примерами

Пример:

// пересчет веса из фунтов в килограммы

program p1 ()

var

fnt: float; // вес в фунтах

kg: float; // вес в килограммах

begin

write (? Вес в фунтах> ?);

readln (fnt);

kg:= fnt * 0.495; // 1 кг = 495 гр

writeln (fnt:6:2, ?  фнт. = ?, kg:6:3, ? кг?);

writeln (? Press  ?);

readln;

end.

Перед разделом var может быть раздел const (раздел именованных констант), в который программист может поместить объявления констант, используемых в программе.

Пример:

// пересчет веса из фунтов в килограммы

program p1 ()

const

K = 0.495; // коэф. пересчета из фунтов в кг

var

fnt: float; // вес в фунтах

kg: float; // вес в килограммах

begin

write (? Вес в фунтах> ?);

readln (fnt);

kg:= fnt * K;

writeln (fnt:6:2, ?  фнт. = ?, kg:6:3, ? кг?);

writeln (? Press  ?);

readln;

end.

Типы данных

Pascal Next поддерживает целый, вещественный и строковый тип данных.

Целый

integer – целые числа в диапазоне -2 147 483 648 … 2 147 483 647

Вещественный

float – положительные и отрицательные вещественные числа в диапазоне от 1.5x10

 до 3.4x10

Строковый

string – строка символов длинной до 128 символов

Переменные

Все переменные программы должны быть объявлены в разделе var той процедуры или функции, в которой они используются.

Числовые

Инструкция объявления числовой переменной целого или вещественного типа в общем случае выглядит так:

имя: тип;

Где:

имя – имя переменной;

тип – тип переменной.

Примеры:

sum: float;

k: integer;

Допускается одной инструкцией объявить несколько переменных одинакового типа.

Пример:

a,b,c: float;

Строковые

Инструкция объявления строковой переменной в общем виде выглядит так:

имя: string [длина];

где:

длина – максимальное количество символов, которое может вместить переменная.

Максимальное допустимое значение параметра длина при объявлении строки – 128.

Пример:

name: string [25];

Допускается одной инструкцией объявить несколько переменных одинакового типа, например:

firstName, lastName: string [12];

При объявлении строковой переменной можно использовать целую именованную константу.