1. Проанализируйте готовую программу, ответьте на вопросы: var mas: array [1..9] of integer;
А) Каково имя массива?
|N, max: integer;
Б) Сколько в нём элементов?
begin
В) Элементы какого типа записаны в
for i:=1 to 11 do begin
массив?
mas [i]:= Random (60);
Г) Как вводятся в массив данные?
write (mas [i],' '); end;
writeln; max := mas [1];
Д) Чему может быть равен наибольший
for i:=2 to 11 do
элемент массива при таком ввода?
if mas [i] > max then max := mas [i];
E) Какую задачу решает программа? writeln (max);
end.

djodanosu7n8    2   21.12.2020 05:33    92