Дано три числа, записанный в отдельных строках. упорядочите их в порядке неубывания. программа должна считывать три числа a, b, c, затем программа должна менять их значения так, чтобы стали выполнены условия a < = b < = c, затем программа выводит тройку a, b, c.
236
393
Ответы на вопрос:
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.
Популярно: Информатика
-
tatarincevai04.11.2022 04:40
-
liza7357810.08.2020 11:15
-
aalbina70717.07.2020 07:44
-
vinnnner29.04.2022 09:31
-
dpravdivaya01.06.2020 23:02
-
MintTea109.04.2023 21:01
-
Агент27114.12.2022 11:26
-
efjvns22.07.2020 05:55
-
Nalasinskaya13.10.2022 05:41
-
korolinkot13.04.2023 10:38