Составьте блок-схему алгоритма решения задачи и программу на языке Turbo Pascal, ввод данных организовать с клавиатуры. Поменять местами значения переменных А и B. Вывести новые значения А и B

Question

Еванфия

1 июля, 17:59

+4

Ответы (1)

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

Фелица · Answer 1

Var A, B, C:Integer;

begin

read (A) ;

read (B) ;

C:=A;

A:=B;

B:=C;

writeln ('A='+inttostr (A)) ;

writeln ('B='+inttostr (B)) ;

readln;

end.