PythonProjects/calculadora.pas at master · sidineyr/PythonProjects · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
program Calculadora;

var
  num1, num2, resultado: real;
  operacao: char;

begin
  write('Digite o primeiro número: ');
  readln(num1);

  write('Digite a operação (+, -, *, /): ');
  readln(operacao);

  write('Digite o segundo número: ');
  readln(num2);

  case operacao of
    '+': resultado := num1 + num2;
    '-': resultado := num1 - num2;
    '*': resultado := num1 * num2;
    '/': begin
           if num2 <> 0 then
             resultado := num1 / num2
           else
           begin
             writeln('Erro: Divisão por zero!');
             halt;  // Encerra o programa com código de erro
           end;
         end;
  else
    writeln('Operação inválida!');
    halt;  // Encerra o programa com código de erro
  end;

  writeln('Resultado: ', resultado);
end.