Сгенерировать массив целых чисел из 15 элементов. числа лежат на интервале от 0 до 100. есть ли в этом получившемя массиве числе 25.найти максимальное из генерированных чисел.(на паскале)

189

332

Посмотреть ответы 2

Ответы на вопрос:

2345tgbkl

Информатика

4,7(53 оценок)

Uses crt; var a: array[1..100] of integer; i, max: integer; beginfor i: =1 to 100 dobegina[i]: =random(100); write(a[i],' '); end; max: =a[1]; for i: =1 to 100 doif a[i]=25 then writeln('да, число 25 есть в этом массиве.'); if a[i]> max then max: =a[i]; writeln('максимальное число массива= ',max); readkey; end.