Перед развилкой стоят 8 поездов, пронумерованных числами от 1 до 8. после того, как какой-то поезд проедет через развилку, стрелка меняет свое положение. в каком порядке должны выстроиться поезда, чтобы последовательно проезжая через развилки оказаться каждый в своем гараже? (в гараже с тем же номером в качестве ответа запишите последовательность цифр от 1 до 8 в том порядке, в котором нужно выстроиться , начиная с первого отправляющегося поезда. пример. если перед развилкой стоят два поезда, то, чтобы оказаться на своих местах, им нужно выстроиться в порядке 2 1 справа налево, в этом случае ответом будет 21.

62843751

Объяснение:

Предположим, что первый свидетель соврал, что автобус - первый, и сказал правду, что маршрутка - вторая.
 Тогда для третьего свидетеля - утверждение про автобус - ложь (так как вторым выехала маршрутка), значит третьим выехал легковой автомобиль.
Тогда оба утверждения второго свидетеля являются ложью (у него легковой автомобиль - четвёртый на перекрестке, грузовик - второй, в у нас получилось легковой автомобиль - третий, в маршрутка - вторая).
Получили противоречие. Значит, первый свидетель сказал правду, что автобус первый и соврал про маршрутку.
Тогда из утверждений третьего свидетеля следует, что легковой автомобиль - третий.
Из второго свидетеля следует, что грузовик - второй.
Тогда маршрутке остаётся четвёртое место.
ответ: АГЛМ

1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.