Предмет: Информатика, автор: Аноним

Напишите программу на паскале (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
valgrisa: Программа выводит сначала массив (10 разных цифр в диапазоне от -10 до 10), а затем (в новой строке) значение максимального элемента
valgrisa: Потому что значения элементов массива каждый раз разные
valgrisa: Если массив имеет вид 3 -3 -9 9 1 -1 5 -5 7 -7, то максимальный элемент 9
valgrisa: Если массив имеет вид -1 -2 -3 -4 -5 -6 -7 -8 -9 -10, то максимальный элемент -1
Похожие вопросы
Предмет: Английский язык, автор: Полkа
Предмет: Математика, автор: gcggvfgvcg