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:
[box type=”info” align=”aligncenter” class=”” width=”100%”]
Algoritmos
[/box]