П4. Произношение английских слов

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

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 A[12]) получи изображение

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) новый

Здесь приведена транскрипция всех английских слов, встречающихся в тексте, кроме самых простых, таких как in. Кроме транскрипции произношение английских слов мне пришлось привести еще и русскими буквами, во-первых потому, что не все разбираются в значках транскрипции, а во-вторых потому, что многие аббревиатуры в среде русскоязычных программистов принято произносить на латинском или на смеси английского с латинским. Значок ударения в русском произношении я по техническим причинам ставил не над гласной буквой, как принято в России, а перед ударным слогом.

Слово	Транс-крипция	Обычное произношение
Add watch		Эд’воч
Alt		Альт
AND		Энд
Append		Э’пенд
array		Э’рэй
Assign		Э’сайн
BackSpace		Бэк’спэйс
Bar3D		Бартри’дэ
Begin		Би’гин
Boolean		‘Булиэн
Byte		Байт
CapsLock		Капс’лок
case		Кэйс
Char		Кэр
Chr		Сиэйч’а
Circle		Сёкл
ClearDevice		Клиэди’вайс
Close		‘Клоуз
CloseGraph		Клоуз’граф
ClrScr		Клиэ’скрин
Compile		Ком’пайл
Copy		‘Копи
CRT		Цээр’тэ
Ctrl		‘Контрол
Cut		Кат
Debug		Ди’баг
Delay		Ди’лэй
Delete		Ди’лит
DirectVideo		Директ’видео
do		Ду
Double		Дабл
downto		‘Даунту
Edit		‘Эдит
Ellipse		Эллипс
else		Элз
End		Энд
EOF		Энд оф ‘файл
exe		‘Экзе
Exit		‘Эксит
Extended		Икс’тендед
false		Фолс
File		Файл
FillEllipse		Фил’эллипс
FloodFill		Флад’фил
for		Фо
Forward		‘Форвард
Frac		Фрак
GetDate		Гэт’дэйт
GetImage		Гэт’имэдж
GetMaxX		Гэтмакс’икс
GetMaxY		Гэтмакс’игрек
GetMem		Гэт’мэм
GetPixel		Гэт’пиксел
GetTime		Гэт’тайм
goto		‘Гоуту
Goto cursor		Гоуту’курсор
GotoXY		Гоутуикс’игрек
Graph		Граф
Halt		Хальт
if		Иф
ImageSize		‘Имэджсайз
IMPLEMENTATION		Имплемен’тэйшн
InitGraph		‘Инитграф
Insert		Ин’сёт
Integer		‘Интеджер
KeyPressed		Ки’пресд
LABEL		Лэйбл
Length		Ленгс
Line		Лайн
LongInt		Лонг’инт
New		Нью
NormWidth		Норм’видс
NoSound		Ноу’саунд
of		Эв
Open		‘Опен
OR		О
Output		Аутпут
OutTextXY		Ауттекстикс’игрек
Paste		Пэйст
PC Speaker		Писи’спикер
PieSlice		Пай’слайс
Pos		По’зишн
PROCEDURE		Про’сиджэ
PROGRAM		‘Програм
PutImage		Пут’имэдж
PutPixel		Пут’пиксел
Random		‘Рэндом
Randomize		Рэндо’майз
Read		Рид
ReadKey		Рид’ки
ReadLn		Рид’лайн
Real		‘Риэл
record		Рекорд
Rectangle		Рек’тангл
repeat		Ри’пит
Reset		Ри’сет
Rewrite		Ри’райт
Round		‘Раунд
Run		Ран
Save		Сэйв
Save as		Сэйв’эз
SetColor		Сет’колор
SetDate		Сет’дэйт
SetFillStyle		Сетфил’стайл
SetLineStyle		Сетлайн’стайл
SetTextStyle		Сеттекст’стайл
SetTime		Сет’тайм
SetUserCharSize		Сет юзеркэр’сайз
Shift		Шифт
ShortInt		Шорт’инт
Single		Сингл
Sound		‘Саунд
Sqr		‘Сквэар
Sqrt		Сквэа’рут
String		Стринг
Succ		Сэ’ксэссор
Text		Текст
TextBackgrownd		Текстбэк’граунд
TextColor		Текст’колор
then		Зэн
ThickWidth		Сик’видс
to		Ту
TopOff		Топ’оф
TopOn		Топ’он
Trace into		Трэйс’инту
true		Тру
TYPE		Тайп
UNIT		‘Юнит
until		Ан’тил
User Screen		Юзер’скрин
Uses		‘Юэеэ
Watch		Воч
while		Вайл
Word		Ворд
Write		Райт
WriteLn		Райт’лайн

Дата добавления: 2014-12-27