Рассмотрите таблицу

Скрипт для спрайта Car

Сцена

Укажите действие пользователя, при котором начнется выполнение скрипта.[1]

Определите условие, при котором программа завершится. [1]

243

395

Посмотреть ответы 1

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

даша3609

Информатика

4,7(19 оценок)

Var a,b,c,d: integer; begin writeln('a, b, c: '); readln(a,b,c); if (a> b)and(a< c)or(a> c)and(a< b) then begin d: =b; b: =c; c: =d; end else if (b> a)and(b< c)or(b> c)and(b< a) then begin d: =a; a: =c; c: =d; end else begin d: =a; a: =b; b: =d; end; writeln('a = ',a,' b = ',b,' c = ',c); end. пример: a, b, c: 8 5 2 a = 2 b = 5 c = 8