Есть ответ 👍

Дано три числа, записанный в отдельных строках. упорядочите их в порядке неубывания. программа должна считывать три числа a, b, c, затем программа должна менять их значения так, чтобы стали выполнены условия a < = b < = c, затем программа выводит тройку a, b, c.

236
393
Посмотреть ответы 2

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


Program abra; var a,b,c,z: integer; begin readln(a,b,c); while not((a< =b) and (b< =c)) do beginz: =0; if a> b then begin z: =b; b: =a; a: =z; end; if b> c then begin z: =c; c: =b; b: =z; end; end; writeln('a: ',a,',b: ',b,',c: ',c); end.

Thank you, now l will add

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