Даны два числа X и Y напишите программу в результате которой эти два числа поменяются значениями

Question

Информатика

Ладимир

2 июля, 09:15

Даны два числа X и Y напишите программу в результате которой эти два числа поменяются значениями

+1

Ответы (1)

Знаете ответ?

Любомила · Answer 1

Program z25;

Var x, y, c:integer;

Begin

write ('Введите x = ') ; readln (x) ;

write ('Введите y = ') ; readln (y) ;

c:=x;

x:=y;

y:=c;

writeln ('X = ', x) ;

writeln ('Y = ', y) ;

End;