Определить объем информации в сообщении смоленск город-герой

1) описание массива должно быть константным, запись  n+20 - переменная. изменить: задать n+20 в виде константы.

2) будет куча ошибок

а) i: byte - есть декларация, но нет инициализации перед использованием, вероятно, будут ошибки при попытке использования как индекс массива. (не совсем уверен, возможно разные среды могут проводить автоинициализацию в ноль, в таком случае тоже будет ошибка, но уже из-за несуществующего индекса массива)

б) нет декларации переменной c, хотя она используется (if c[i] mod 10=0 then p: =p+1; )

программа на паскале:

program xxx;       var a, b: real; begin  writeln('введите количество миль');   readln(a);   b: = a*1.6;   writeln('кол-во киллометров - ',b)end.