Ler dois valores para as variáveis A e B e efetuar a troca dos valores e apresentar os valores de A e B após a troca
Pseudocódigo:
programa exercicio8
var
a,b,c : inteiro;
inicio
leia a;
leia b;
leia c;
c ← a;
a ← b;
b ← c;
escreva a;
escreva b;
fim.
Pascal:
// Autor: Rafael Oliveira
// Data: 03/03/2010
Program exercicio8;
uses crt;
var
a, b, c : integer;
Begin
writeln('Insira valor de A');
readln(a);
writeln('Insira valor de B');
readln(b);
c := a;
a := b;
b := c;
writeln('Valor de A = ', a);
writeln('Valor de B = ', b);
writeln('Pressione para fechar');
readkey;
End.
Veja também: