Можешь изменить эту программу следующим образом: найти максимальную компоненту переменной х типа вектор
Приложения:

Ответы
Ответ дал:
0
Заменить приведенный во вложении фрагмент на
s:=a[1];
for i:=2 to 5 do
if a[i]>s then s:=a[i];
Writeln('Максимум=',s);
s:=a[1];
for i:=2 to 5 do
if a[i]>s then s:=a[i];
Writeln('Максимум=',s);
Приложения:

Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад