Задать вопрос
24 марта, 02:14

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.

в чем ошибка?

+5
Ответы (1)
  1. 24 марта, 06:10
    0
    Нужно объявить переменную.

    Var n: integer;
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Program dom; Var A : array [1 ... 5000] of integer; i : byte; Begin Writeln ('введите количество станций-n') ; Readln (n) ; For i:=1 to 255 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы