C. Путешествие по телепортам Алиса решила отправиться в путешествие в Далёкую галактику. Природа связала планеты этой галактики причудливой системой телепортов: на каждой планете есть ровно один телепорт, который ведёт на какую-то планету этой же галактики (возможно, на ту же самую планету Алиса хочет провести свой отпуск, путешествуя по планетам Далёкой галактики: она хочет на межгалактическом лайнере добраться до одной из планет, а дальше перемещаться через телепорты Алисе выбрать, на какую планету отправиться на межгалактическом лайнере так, чтобы за своё путешествие посетить как можно больше различных планет. Алиса решила отправиться в путешествие в Далёкую галактику. Природа связала планеты этой галактики причудливой системой телепортов: на каждой планете есть ровно один телепорт, который ведёт на какую-то планету этой же галактики (возможно, на ту же самую планету). Алиса хочет провести свой отпуск, путешествуя по планетам Далёкой галактики: она хочет на межгалактическом лайнере добраться до одной из планет, а дальше перемещаться через телепорты Алисе выбрать, на какую планету отправиться на межгалактическом лайнере так, чтобы за своё путешествие посетить как можно больше различных планет.
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Найди лишнее и зачеркни буква, число, цифра, символ
Автор: sergeystepanov231
Надо написать на языке python,
Автор: Равилевич_Олеговна1496
Вычислить сумму элементов массива, кратных 3.количество элементов в массиве 25.
Автор: Константиновна
Какие типы программ обычно рас бесплатно?
Автор: LIN1022
Где кроме компьютера есть операционная система
Автор: ev89036973460
Uses Crt;
var
a,c,b:integer;
begin
ClrScr;
repeat
writeln('INPUT 3-x znachoe');
readln(b);
until (b>=100)and(b<=999);
a:=b div 100+(b div 10)mod 10;
c:=(b div 10)mod 10+b mod 10;
if a<c then
writeln(a,c)
else
writeln(c,a);
Readkey;
end.