Program Pzim ;
{5. Escreva um programa que leia um carácter '+', '-', '*' ou '/' que indica uma
operação aritmética a efetuar com os dois números que são introduzidos a seguir
e apresente o resultado da operação. }
var
sinal:char;
n1, n2:integer;
res:real;
Begin
writeln('Qual operação deseja realizar ? ');
writeln(' soma = "+", subtração = "-", Multiplicação "*" ou divisão "/"');
readln(sinal);
writeln('Digite o 1o. Número : ');
readln(n1);
writeln('Digite o 2o; Número : ');
readln(n2);
if (sinal='+') then
begin
res:=n1+n2;
writeln('O resultado da soma é : ',res:1:2);
end;
if (sinal='-') then
begin
res:=n1-n2;
writeln('O resultado da soma é : ',res:1:2);
end;
if (sinal='*') then
begin
res:=n1*n2;
writeln('O resultado da soma é : ',res:1:2);
end;
if (sinal='/') then
begin
res:=n1/n2;
writeln('O resultado da soma é : ',res:1:2);
end;
End.
