Задание
Заполни пропуски в программе, используя предложенные варианты ответов.
Задача: найти значение максимального элемента в одномерном массиве, который заполняется случайными числами.
var M: array [\(1\)..\(10\)]
of
integer;
i, max:
integer
;
begin
randomize
;
for i: \(=\) \(1\) to \(10\) do
begin
M[i]: \(=\) random (
\(10\)
);
write (M[i],' ');
end;
for
i: \(=\) \(1\) to \(10\) do
begin
if (M[i] \(\gt\)
max
)
then
max: \(=\) M[i];
end;
writeln(' ');
writeln
(max)
end.
Варианты ответов:
then
M
if
of
\(10\)
writeln
randomize
real
integer
for
max