Question

Program Pascal
se dau 2 nr. naturale a si b. Schimbati reciproc valorile lor in cazul cand a este mai mic decat b. Puteti utiliza o variabila auxiliara.
va rog ajutor

Answer 1

var a,b: integer;
Begin
writeln('Introduceti nr. a si b:');
readln(a,b);
a:=a+b;
b:=a-b;
a:=a-b;
writeln('a=',a);
writeln('b=',b);
End.