Mapeamento de algoritmos para pascal

APOSTILA DE PASCAL
1. MAPEAMENTO DE ALGORITMOS PARA PASCAL
Program Exercicio1; var nome : string; aux : integer; salario : real; nivel_superior : boolean; begin for aux := 1 to 10 do begin writeln(‘Digite nome : ‘); readln(nome); writeln(‘Digite idade : ‘); readln(idade); writeln(‘Tem nível superior : ‘); readln(nivel_superior); if nivel_superior then salario := 1000 * 1.15 else salario := 1000; end; 2 aux := 0; while aux identificador = valor_constante; var < declaração de variáveis > variavel1, variavel2, ... , variaveln : tipo; type < declaração de tipos > Identificador1, identificador2, ... , identificadorn = ; begin < comandos > end. Tipos básicos de dados Integer, real, boolean, char, string Atribuição em Pascal variavel := valor; Comentários { os comentários são colocados entre chaves } (* ou são colocados entre parênteses e asteriscos *) Operadores relacionais Algoritmo e ou x-ou não Pascal and or xor not

Funções numéricas
Nome ABS(número) : real ou inteiro

Descrição valor absoluto de trunca o valor real de arredonda o valor real de quadrado de raiz quadrada de o sucessor de X no conjunto de valores considerado, se existir o predecessor de X no conjunto de valores considerado, se existir

TRUNC(número) : inteiro ROUND(número) : inteiro SQR(número) : real ou inteiro SQRT(número) : real SUCC(X)

PRED(X)

Outras funções:
ORD(C) : inteiro Indica a ordem de (variável ou constante literal) no conjunto de caracteres usado na implementação.

Exemplo: TYPE Letras = (‘A’, ‘B’, ‘C’, ‘D’); minhaLetra : Letras; minhaLetra := ‘B’; writeln(Ord(minhaLetra)); writeln(Ord(‘B’)); Resultado: 1 66 ********************** O resultado 1 corresponde à posição no conjunto de letras (A..D). O resultado 66 corresponde à posição na tabela ASCII.

CHR(número) : char Caractere que corresponde à ordem, dada pelo valor do , se existir, no conjunto de caracteres utilizados. DELETE(nome_string, pos, número) Remove uma substring contedo “número” caracteres da