Var a, b, c: integer; begin Writeln('Введите первое число'); readln(a); Writeln('Введите второе число'); readln(b); Writeln('Введите третье число'); readln(c); if (A > B) and (A > C) and (B > C) then Writeln(a, b, c) else if (B > A) and (B > C) and (A > C) then Writeln(b, a, c) else if (C > A) and (C > B) and (B > A) Then writeln(c, b, a) else if (A > B) AND (A > C) AND (C > B) THEN WRITELN(A, C, B) ELSE if (B > A) AND (B > C) AND (C > A) THEN WRITELN(B, C, A) ELSE if (C > A) AND (C > B) AND (A > B) THEN WRITELN(C, A, B);end.
Операційні системи бувають двох видів: текстові та графічні. Текстові - це переважно інтерфейси, які базуються на використанні командного рядка (введення набору команд, за до яких користувач може здійснити ту чи іншу дію чи отримати певну інформацію). Основним пристроєм керування в даних ОС є клавіатура. Прикладом текстових ОС є DOS. Графічні - це інтерфейси сучасних операційних систем, які складаються з вікон, меню, та інших графічних елементів, що взаємодіють між собою. Основними пристроями керування в даних ОС є як клавіатура так і миша. Прикладом графічних ОС є Windows, Linux, OS X тощо.
begin Writeln('Введите первое число'); readln(a); Writeln('Введите второе число'); readln(b); Writeln('Введите третье число'); readln(c); if (A > B) and (A > C) and (B > C) then Writeln(a, b, c) else if (B > A) and (B > C) and (A > C) then Writeln(b, a, c) else if (C > A) and (C > B) and (B > A) Then writeln(c, b, a) else if (A > B) AND (A > C) AND (C > B) THEN WRITELN(A, C, B) ELSE if (B > A) AND (B > C) AND (C > A) THEN WRITELN(B, C, A) ELSE if (C > A) AND (C > B) AND (A > B) THEN WRITELN(C, A, B);end.