3)
C:\информатика\рисунки\часть2\урок2.<span>doc</span>
<span>__________________________________</span>
Если брать каждую цифру не более 1 раза (в самом 3-х значном числе), тогда:
1) чисел, начинающихся с 1 будет 6; с 3-тоже 6, с 5 - 6, с 7 - 6
2) 6*4=24. 24 числа
Var
a, b: integer;
x, y, z, t: integer;
begin
{2}
Readln(a);
Writeln(Sign(a) * abs(a + 3));
{3}
Readln(a, b);
if a > b then a := b;
Writeln(a);
{4}
Readln(x, y, z);
if (x > y) and (y > z) then t := 5
else t := -1;
x := x * t;
y := y * t;
z := z * t;
Writeln(x, ' ', y, ' ', z)
end.
Был в каталоге С:\Музыка\Хиты
1. Сначала опустился на один уровень вниз в каталог Ретро => С:\Музыка\Хиты\Ретро
2. Затем поднялся на один уровень вверх, проще говоря, вернулся назад в С:\Музыка\Хиты
3. Спустился на один уровень вниз в каталог Лучшие => С:\Музыка\Хиты\Лучшие и здесь нашел файл.
Полный путь - С:\Музыка\Хиты\Лучшие\Белые_розы.mp3