Question

Составить программу на языке Паскаль обмена значениями двух переменных.Помогите пожалуйста!!!

Answer 1

Программа:
program Project1
uses crt;
var a,b,c:intiger;
begin
clrscr;
write('a= '); readln(a);
write('b=' ); readln(b);
с: =a;
a:= b;
b:=с;
readln;
writeln('a= '.a);
writeln('b= '.b);
readln
end.

Answer 2

Конечно, вот простая программа на языке Паскаль для обмена значениями двух переменных:

scssCopy code
program exchangeVariables;

var
  a, b, temp: integer;

begin
  write('Enter the value of a: ');
  readln(a);
  write('Enter the value of b: ');
  readln(b);

  temp := a;
  a := b;
  b := temp;

  writeln('After exchange, the value of a is: ', a);
  writeln('After exchange, the value of b is: ', b);
end.

В этой программе мы используем временную переменную temp, чтобы сохранить значение переменной a, затем присваиваем переменной a значение переменной b, и, наконец, присваиваем переменной b значение временной переменной temp, которая содержит оригинальное значение переменной a.