Информатика, опубликовано 2018-08-22 22:43:55 by Гость
Очень нужна помощь по информатике! В Паскале!!! Создайте массив из 15 целочисленных элементов и определите среди них максимальное значение. Заполните случайным образом.
Ответ оставил Гость
Const
n=15;
var
a:array[1..n]of integer;
i,max:integer;
begin
for i:=1 to n do
begin
a[i]:=random(100)-50;
write(a[i]:4);
end;max:=a[1];
for i:=2 to n do
if a[i]>max then
max:=a[i];
writeln;
writeln(max);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на