Решение представлено во вложениях.
Язык: Pascal;
Примечание: индексация массива начинается с 0.
Первые два скриншота - сама программа. Остальные - демонстрация работы.
Решение представлено во вложениях.
Язык: Pascal;
Примечание: индексация массива начинается с 0.
Первые два скриншота - сама программа. Остальные - демонстрация работы.