Program dom; var a : array [1..5000] of integer ; i : byte ; begin writeln('введите количество станций-n'); readln(n); for i: =1 to 255 do readln (a[i]); end. в чем ошибка?

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку