Напишите программу на паскале (8 класс)
Приложения:
Ответы на вопрос
Ответил valgrisa
1
Ответ:
program test;
var a: array [1..10] of integer;
i,m: integer;
begin
randomize;
for i:=1 to 10 do
begin
a[i]:=random(21)-10;
if i=1 then m:=a[i] else
if a[i]>m then m:=a[i];
write(a[i],' ')
end;
writeln;
write(m)
end.
valgrisa:
random (21) даёт числа от 0 до 20, 0 - 10 = -10, 20 - 10 = 10
Программа выводит сначала массив (10 разных цифр в диапазоне от -10 до 10), а затем (в новой строке) значение максимального элемента
Потому что значения элементов массива каждый раз разные
Если массив имеет вид 3 -3 -9 9 1 -1 5 -5 7 -7, то максимальный элемент 9
Если массив имеет вид -1 -2 -3 -4 -5 -6 -7 -8 -9 -10, то максимальный элемент -1
Новые вопросы
Другие предметы,
2 года назад