Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Turbo-Pascal.7.0.doc
Скачиваний:
19
Добавлен:
08.11.2018
Размер:
3.66 Mб
Скачать

П3. Список некоторых операций, процедур и функций Паскаля

Приведу список большинства пройденных нами операций и стандартных процедур и функций с указанием типа их параметров (или по-другому – аргументов и результата)

Математика

Sqr (A) аргумент A – любого числового типа, результат - того же типа, что и A

Sqrt (A) аргумент A – любого числового типа, результат - того же типа, что и A

Pi значение - вещественное

Frac (A) аргумент A и результат - вещественные

Int (A) аргумент A и результат - вещественные

Round (A) аргумент A вещественный, результат - LongInt

Abs (A) аргумент A – любого числового типа, результат - того же типа, что и A

Random результат - вещественный

Random (A) аргумент A и результат - Word

Randomize процедура

A div B операнды A и B и результат операции div - только целочисленного типа

A mod B операнды A и B и результат операции mod - только целочисленного типа

Модуль crt

Процедура или функция Смысл

Sound (A :Word) звук

NoSound нет звука

Delay (A :Word) отсрочка

ReadKey :Char читай клавишу

KeyPressed :Boolean клавиша нажата

TextColor (A :Byte) цвет текста

TextBackground (A :Byte) цвет фона

ClrScr очистка экрана

GotoXY (X,Y :Byte) иди к икс игрек

Модуль Graph

InitGraph (d,m :Integer; path :String) инициализация графики

CloseGraph закрытие графики

PutPixel (x,y :Integer; color :Word) поставь пиксел

GetPixel (x,y :Integer) :Word получи пиксел

Line(x1,y1, x2,y2 :Integer) отрезок прямой линии

Rectangle (x1,y1, x2,y2 :Integer) прямоугольник

Bar (x1,y1, x2,y2:Integer) залитый прямоугольник

Bar3D (x1,y1, x2,y2:Integer; tol:Word; top:Boolean) параллелепипед

Circle (x,y :Integer; r :Word) окружность

Arc (x,y :Integer; fi1,fi2,r :Word) дуга окружности

PieSlice (x,y :Integer; fi1,fi2,r :Word) кусок пирога (залитый сектор круга)

Ellipse (x,y :Integer; fi1,fi2, rx,ry :Word) эллипс

Sector (x,y :Integer; fi1,fi2, rx,ry :Word) залитый сектор эллипса

FillEllipse (x,y :Integer; rx,ry :Word) залитый эллипс

SetColor (color :Word) установить цвет линий

SetLineStile (ls,uzor,tolsh :Word) установить стиль линий

SetFillStyle(uzor,color :Word) установить стиль заливки

FloodFill(x,y :Integer; granitsa :Word) заливка

GetMaxX :Integer получи максимальный икс

GetMaxY :Integer получи максимальный игрек

GetImage (x1,y1, x2,y2 :Integer; var A12) получи изображение

PutImage (x1,y1 :Integer; var A; mode :Word) помести изображение

ImageSize (x1,y1, x2,y2 :Integer) размер изображения

OutTextXY (x,y :Integer; stroka :String) вывод текста

SetTextStyle (shrift,napravl,razmer :Word) установи стиль текста

SetUserCharSize (A,B, C,D :Word) установи пользовательский размер символов

Модуль DOS

GetTime (var chas,min,sec,sotki :Word) получи время

SetTime (chas,min,sec,sotki :Word) установи время

GetDate (var god,mes,den,dennedeli :Word) получи дату

SetDate (god,mes,den :Word) установи дату

Работа со строками

Pos (s1,s :String) :Byte позиция

Length (s :String) :Byte длина

Copy (s :String; a,b :Integer) :String копируй

Delete (var s :String; a,b :Integer) удаляй

Insert (var s :String; s1 :String; a :Integer) вставляй

Работа с файлами

Assign (var f: Text; filename :String) упрощенно присвоить

Rewrite (var f: Text) упрощенно переписать

Reset (var f: Text) упрощенно переустановить

Close (var f: Text) упрощенно закрыть

Append (var f: Text) добавить

Прочие

Chr (A :Byte) :Char символ

GetMem(P :Pointer; razmer :Word) выдели память

New (var p: Pointer) новый

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]