Срочно !!!! Заполнить собственными индексами элементы массива B1,B2...B10.
Срочно !!!!
Заполнить собственными индексами элементы массива B1,B2...B10.
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var b:array[1..10] of integer;
for var i:=1 to 10 do begin
b[i]:=i; Write(b[i],' ')
end
end.
Результат:
1 2 3 4 5 6 7 8 9 10
Не нашли ответ?
Похожие вопросы