Есть ответ 👍

Напишите программу для паскаля. условие: обменять значения двух переменных, используя третью(буферную) переменную

271
285
Посмотреть ответы 2

Ответы на вопрос:


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.

 


if a[i]>a[min]

Для объяснений я слишком устал, надеюсь и ответа хватит :Р

Популярно: Информатика