На паскале Задание: Сформировать одномерный массив из 10-ти элементов. Значение элементов массива должно быть равно его индексу.
На паскале
Задание: Сформировать одномерный массив из 10-ти элементов. Значение элементов массива должно быть равно его индексу.
Гость
Ответ(ы) на вопрос:
Гость//PascalABC
begin
ArrGen(10, i -> i).Print(', ');
end.
Гость1. Вот так учат писать в школе...
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
const
n=10;
var
a:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=i;
Write(a[i],' ')
end;
Writeln;
end.
Результат выполнения программы
1 2 3 4 5 6 7 8 9 10
2. А вот так пишут "в жизни"
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
begin
var a:=Range(1,10).ToArray;
a.Println
end.
Не нашли ответ?
Похожие вопросы