//PascalABC.Net
const
N = 20;
var
a: array [1..N] of integer;
k, min: integer;
begin
k := 1;
//Получим 1-ый элемент массива
a[1] := Random(41) - 20;
min := a[1];
write(a[1]:4);
//Получим оставшиеся элементы массива
//найдем минимальный, запомним его номер
//и выведем массив на экран
for var i := 2 to N do
begin
a[i] := Random(41) - 20;
if a[i] < min then begin
min := a[i];
k := i;
end;
write(a[i]:4);
end;
if k <> 1 then swap(a[1], a[k]);
writeln;
//Вывод массива после замены
for var i := 1 to n do write(a[i]:4);
end.
1. Взять лопату
2. Вырыть яму.
3. Взять ведро
4. Полить водою
5. Взять семя
6. Посадить семя
7.Взять лопату
8.Закопать яму
9. Взять ведро
10. Полить водой
Потому что компьютер принимает всю информацию в формате 0 и 1, вся информация в компьютере, это нечто такое: 00011011001 01010101 010100 10 010 000 0 0 10101010 101 01111 111 0 01010 и тд. А это двоичная система счисления (в ней используется 2 символа 0 и 1)
Космос или астрономия как то так
344₅ + 1 = 400₅
В пятиричной системе 4 - старшая цифра, после добавления +1 следует сброс разряда в 0 перенос +1 в старший разряд.