LISTA DAS
PALAVRAS RESERVADAS
AND ARRAY BEGIN CASE CONST DIV
DO DOWNTO ELSE END FILE FOR
FUNCTION GOTO IF IN LABEL MOD
NIL NOT OF OR PACKED PROCEDURE
PROGRAM RECORD REPEAT SET
THEN TO
TYPE UNTIL VAR WHILE WITH
APENDICE 2
FUNÇÕES
PREDEFINIDAS PADRÃO
Função Tipo
do Tipo do Finalidade
parâmetro
resultado
ABS(X) INTEGER ou O mesmo de X Calcula o valor absoluto
REAL de X
ARCTAN(X) INTEGER ou REAL Calcula o arcotangente de
REAL X
CHR(X) INTEGER CHAR Retorna o caráter ASCII
cuja ordem corresponde a X
COS(X) INTEGER ou REAL Calcula o cosseno de um
REAL ângulo X em radianos
EOF(X) FILE BOOLEAN Retorna TRUE se foi detec
tado o final do arquivo X e FALSE no caso contrário
EOLN(X) FILE BOOLEAN Retorna TRUE se foi detec
tado um final de linha para o arquivo X e FALSE no caso contrário
EXP(X) INTEGER ou REAL Calcula e elevado a x, onde REAL e = 2.7182818... (base do Sistema de Logaritmos Nepe
rianos)
LN(X) INTEGER ou REAL Calcula o Logaritmo Natu-
REAL ral de X, para X > 0
ODD(X) INTEGER BOOLEAN Retorna TRUE se X é ímpar
e FALSE se X é par
ORD(X) CHAR ou INTEGER Retorna o inteiro escalar enu merado correspondente à or dem de posicionamento do caráter X no conjunto de va lores em que X está contido
Função
Tipo do Tipo do Finalidade
parâmetro resultado
PRED(X) INTEGER, CHAR O mesmo de X Determina o predecessor
BOOLEAN, ou de X, se existir
tipo simples
definido pelo
usuário
ROUND(X) REAL INTEGER Arredonda o valor de X pa
ra o inteiro mais próximo
SIN(X) INTEGER ou REAL Calcula o seno de um ângulo
REAL X em radianos
SQR(X) INTEGER ou O mesmo de X Calcula o quadrado de X
REAL
SQRT(X) INTEGER ou REAL Calcula a raiz quadrada de
REAL X, para X >= 0
SUCC(X) INTEGER, CHAR O mesmo de X Determina o sucessor de X,
BOOLEAN, ou se existir
tipo simples
definido pelo
usuário
TRUNC(X) REAL INTEGER Efetua o truncamento de X
(elimina a parte fracionária de X)
APENDICE 3
PROCEDIMENTOS
PREDEFINIDOS PADRÃO
Procedimento Finalidade
DISPOSE(X) Libera uma variável dinâmica X
GET(X) Transfere dados de um arquivo X de entrada para o buffer do arquivo. Atribue o valor TRUE a EOF(X) caso seja feita uma tentativa de leitura após atingir o final do arquivo X e FALSE para o caso contrário
NEW(X) Cria uma nova variável dinâmica e faz com que X aponte para ela
PACK(ARR1, IND, ARR2) Converte o array ARR1 não compactado, a partir da posição IND, armazenando o resultado compactado em ARR2
PAGE Faz com que a próxima saída seja efetuada no topo de uma nova página
PUT(X) Transfere dados do buffer para um arquivo de saída X
READ(X, VARIÁVEIS) Lê as VARIÁVEIS a partir do arquivo de entrada X
READLN(X, VARIÁVEIS) Lê as VARIÁVEIS a partir do arquivo de entrada X e salta para uma nova linha
RESET(X) Abre um arquivo X para leitura. Atribue o valor TRUE a EOF(X) se o arquivo X está vazio e FALSE no caso contrário
REWRITE(X) Abre
um arquivo X para saída, apagando antes as informações
eventualmente existentes no arquivo
X
UNPACK(ARR2, ARR1, IND) Transfere os elementos do array compactado ARR2 para o array não
compactado ARR1 a partir da posição
IND de ARR1
WRITE(X, VARIÁVEIS) Escreve os valores das VARIÁVEIS no arquivo de saída X
WRITELN(X, VARIÁVEIS) Escreve os valores das VARIÁVEIS no arquivo de saída X e a seguir, salta para uma nova linha