Задание 5 Параграф 22 ГДЗ Семакин 8 класс (Информатика)

5. Составьте программу сортировки по возрастанию значений трёх переменных: А, В, С. program task_5; var a,b,c:integer; begin writeln(taskВведите a,b,ctask); readln(a,b,c); if a >



Решение задачи: 5. Составьте программу сортировки по возрастанию значений трёх переменных: А, В, С. program task_5; var a,b,c:integer; begin writeln(taskВведите a,b,ctask); readln(a,b,c); if a >

Ниже вариант решения задания из учебника Семакин, Залогова 8 класс, Просвещение:

5. Составьте программу сортировки по возрастанию значений трёх переменных: А, В, С.

program task_5;

var a,b,c:integer;

begin

writeln(taskВведите a,b,ctask);

readln(a,b,c);

if a > b then begin a:=a+b; b:=a-b; a:=a-b end;

if b > c then begin b:=b+c; c:=b-c; b:=b-c end;

if a > b then begin a:=a+b; b:=a-b; a:=a-b end;

writeln(taska=task,a,task b=task,b,task c=task,c);

end.