Сформировать массив из 100 элементов и вывести его в строку. Объясните пожалуйста)
Сформировать массив из 100 элементов и вывести его в строку. Объясните пожалуйста)
Ответ(ы) на вопрос:
Program zadacha;
Type mas=Array[0..100] of Integer; //так делается тип твоего массива
Var m:mas; // обозначается
i,n:Integer;
Begin
ReadLn(n); // вводится длина массиа
For i:=1 to n do begin // начинаем цикл
m[i]:=i; // присваивает элементу массива как значение - его номер
Write(m[i],' '); // печатаем
end; // заканчиваем цикл
ReadLn; // вводится, чтобы консоль сразу не закрывалась(будешь сдавать задачу в систему - не пиши!!
End.
Не нашли ответ?
Похожие вопросы