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

Question

Информатика

Гелий

4 декабря, 08:44

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

+2

Ответы (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;