1) составьте программу сортировки по озрастанию значений трех переменных: А, В, С 2)…

CLSINPUT aINPUT bINPUT cIF b <= c AND b <= a THEN w=b: b=a: a=wIF c <= a AND c <= b THEN w=c: c=a: a=wIF c <= b THEN w=c: c=b: b=wPRINT a; b; cEND CLSa: INPUT «введи a"; aIF a=0 THEN PRINT «уравнение не квадратное": SLEEP 1: GOTO aINPUT «введи b"; bINPUT «введи c"; cD=b ^ 2 — 4*a*cIF D < 0 THEN PRINT «нет решений": ENDx1=(-b+SQR (D) / (2*a) x2=(-b — SQR (D) / (2*a) PRINT "x1="; x1PRINT "x2="; x2