Заполнить массив, состоящий из 100 элементов в автоматическом режиме. Найти и изменить пятидесятый элемент массива.
Заполнить массив, состоящий из 100 элементов в автоматическом режиме. Найти и изменить пятидесятый элемент массива.
Гость
Ответ(ы) на вопрос:
Гостьvar
a:array[1..100] of integer;
i:byte;
begin
for 1 to 100 do a[i]:=random(100);
writeln("50 элемент массива =",a[50]);
writeln("введите новое значение");
readln(a[50]);
end.
Не нашли ответ?
Похожие вопросы