помогите написать программу на PascalABCNET

Хакер Василий получил доступ к классному журналу и хочет заменить все свои минимальные оценки на максимальные. Напишите программу, которая заменяет оценки Василия, но наоборот (все максимальные — на минимальные).

ВХОДНЫЕ ДАННЫЕ

Дано количество оценок Василия (не больше 100), затем сами оценки.

ВЫХОДНЫЕ ДАННЫЕ

Требуется вывести исправленные оценки в том же порядке.

Приложения:

Ответы

Ответ дал: Аноним
0
__________________________
Приложения:
Ответ дал: osustream
0
я ввел 5 1 3 3 3 4
Ответ дал: osustream
0
через другой компилятор получилось
Ответ дал: osustream
0
спасибо
Ответ дал: Аноним
0
В девятую строку вместо
if (S[i]<>' ') then C+=S[i]
напиши if (S[i]<>' ')and(S[i] in ['0','1','2','3','4','5','6','7','8','9']) then C+=S[i]
глючить перестанет
Ответ дал: Аноним
0
Да не за что=)
Вас заинтересует