Pascal/Expressões Aritméticas

EXPRESSÕES MATEMÁTICAS

Chamamos de operadores matemáticos ou aritméticos o conjunto de símbolos que representa as operações básicas da matemática, a saber:

+ adição ;  - subtração ; 
* multiplicação ; / divisão ; 

Exemplos:

 -2 + 2 ; ABC / 5 ; aula * ABC + XPTO – 8.

Construa um algoritmo que calcule a média aritmética entre quatro notas quaisquer fornecidas pelo usuário.

Program media;
uses crt;
var
N1, N2, N3, N4: real;
begin
  clrscr;
  writeln('Digite as 4 notas');
  readln( N1, N2, N3, N4 );
  writeln('A média do aluno é: ',(N1+N2+N3+N4)/4);
  readkey;
end. 

FUNÇÕES MATEMÁTICAS

Existem comandos que executam funções matemáticas. Consulte a ajuda do compilador para uma lista detalhada. Dentre os principais temos:

DIV Retorna o quociente inteiro da divisão.

Sintaxe:

num_inteiro:=(num1)DIV(num2);

MOD Retorna o resto da divisão.

Sintaxe:

resto:=(num1)MOD(num2);

Exemplo: Faça um programa para ler 2 números inteiros, dividi-los e escrever o resto de sua divisão.

program resto;
uses crt;
var
 a,b,c:integer;
begin
  clrscr;
  writeln('Digite 2 números inteiros');
  readln(a,b);
  c:=(a)mod(b);
  writeln('O resto da divisão do número ',a,' pelo número ',b,' é ',c);
  readkey;
end.

INT(x) – resulta a parte inteira de um número X.

FRAC(x) – resulta a parte fracionária de X.

ABS(x) – resulta o valor absoluto de X. Não importa se o número é negativo ou positivo, com ABS sempre retorna positivo.

SQR(x) – resulta no quadrado de X.

SQRT(x) – resulta na raiz quadrada de X (para X real não negativo)

Exemplos

      (15)DIV(7) resulta 2
      (15)MOD(7) resulta 1
      INT(34.567) resulta 34
      FRAC(546.34) resulta 34   
      ABS(-34) resulta 34 
      SQR(4) resulta 16
      SQRT(64) resulta 8