Напишите программу для паскаля. условие: обменять значения двух переменных, используя третью(буферную) переменную
271
285
Ответы на вопрос:
var
a, b, buf: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
buf : = a;
a : = b;
b : = buf;
writeln('a = ', a);
writeln('b = ', b);
end.
// без буферной переменной
var
a, b: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
a : = a + b;
b : = a - b;
a : = a - b;
writeln('a = ', a);
writeln('b = ', b);
end.
Популярно: Информатика
-
Поля20060114.02.2023 23:53
-
AshesSpy09.12.2021 05:59
-
krasio17.08.2021 22:43
-
austry133713.04.2023 04:11
-
saveliy816.06.2020 15:01
-
korolevandrej4807.07.2021 22:47
-
casualsicp04.02.2023 05:13
-
CloseBooks15.09.2020 02:01
-
mehimehi22514.01.2021 08:56
-
виталий14614.11.2020 21:15