🔥ГДЗ под запретом?

Задание 6 Параграф 1.2 ГДЗ Босова 9 класс 2023 (Информатика)

Не совпадает с вашим учебником?
Посмотрите устаревший решебник

Решение #1

Изображение 6. Напишите программу обмена значений переменных а, b, с в порядке возрастания, т. е. так, чтобы а < b < с. Используйте процедуру swap.procedure swap(var х, у:...
Загрузка...

Рассмотрим вариант решения задания из учебника Босова 9 класс, Просвещение:
6. Напишите программу обмена значений переменных а, b, с в порядке возрастания, т. е. так, чтобы а < b < с. Используйте процедуру swap.
procedure swap(var х, у: integer);
var m: integer;
begin
m: =x;
x:=y;
у: =m
end;
Исходные данные вводятся с клавиатуры.

var
a, b, c: integer;
procedure swap(var x, y: integer);
var
m: integer;
begin
m := x;
x := y;
y := m
end;
begin
write('Введи a,b,c > > ');
readln(a, b, c);
if a > b then swap(a, b);
if a > c then swap(a, c);
if b > c then swap(b, c);
writeln(a, ' ', b, ' ', c)
end.

Окно вывода:
Введи a,b,c > > 9 3 5
3 5 9
*Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания.
*К сожалению, временные проблемы с публикацией комментариев с мобильных устройств.