Информатика, опубликовано 2018-08-22 20:39:34 by Гость
Помогите пожалуйста написать программу)))Даны три числа, вывести их на экран в порядке возрастания.
Ответ оставил Гость
Program asd;
USES crt;
var a,b,c,m,m1,s:integer;
BEGIN
clrscr;
writeln(Vvedite chisla: );
readln(a,b,c);
m:=a;
if b
if b>m1 then m1:=b;
if c>m1 then m1:=c;
s:=a+b+c-m1-m;
write(m, ,s, ,m1);
readln;
END.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на