Предмет: Информатика,
автор: ololoev2001
Напишите программу на языке программирования (или составьте алгоритм).
Заполнить массив В, состоящий из сорока элементов, случайными целыми числами
из интервала [–30; 50] и найти максимальный элемент.
Ответы
Автор ответа:
0
var i,max:integer;
b:array[1..40] of integer;
begin
randomize;
for i:=1 to 40 do
begin
b[i]:=random(random(80))-30;
write(b[i],' ');
end;
writeln;
max:=b[1];
for i:=1 to 40 do
begin
if b[i]>= max then
begin
max:=b[i];
end;
end;
writeln('Максимальный элемент массива: ',max);
end.
b:array[1..40] of integer;
begin
randomize;
for i:=1 to 40 do
begin
b[i]:=random(random(80))-30;
write(b[i],' ');
end;
writeln;
max:=b[1];
for i:=1 to 40 do
begin
if b[i]>= max then
begin
max:=b[i];
end;
end;
writeln('Максимальный элемент массива: ',max);
end.
Автор ответа:
0
а почему интервал от 1 до 40,а не от -30 до 40,как в условии
Автор ответа:
0
Это не интервал а размер массива
Автор ответа:
0
Интервал записан в 7 строке
Автор ответа:
0
Кстати там просто random(80)-30 не знаю почему я там бред написал xD
Автор ответа:
0
Кстати там просто random(80)-30 не знаю почему я там бред написал xD
Интересные вопросы
Предмет: Алгебра,
автор: magomedovrustam651
Предмет: Математика,
автор: dakaisaeva367
Предмет: Русский язык,
автор: Olya12301
Предмет: Математика,
автор: Polik1102
Предмет: Математика,
автор: venera124