ПАСКАЛЬ.Дан массив из 100 элементов. Необходимо заполнить первые n из них первыми n натуральными числами в порядке возрастания Формат входных данных С клавиатуры вводится натуральное число n (n≤100n≤100). Формат выходных данных...
ПАСКАЛЬ.Дан массив из 100 элементов. Необходимо заполнить первые n из них первыми n натуральными числами в порядке возрастания
Формат входных данных
С клавиатуры вводится натуральное число n (n≤100n≤100).
Формат выходных данных
Требуется вывести содержимое первых nn элементов массива после заполнения согласно условию задачи. Элементы должны разделяться пробелами.
Ответ(ы) на вопрос:
Гость
var ar:array[1..100]of integer;
i,n:integer;
begin
read(n);
for i:=1 to n do
ar[i]:=i;
for i:=1 to n do
write(ar[i],' ');
end.
Не нашли ответ?
Похожие вопросы