В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
trul85
trul85
25.05.2022 03:03 •  Информатика

Операциялық жүйеге ... кіреді​

Показать ответ
Ответ:
xellgf
xellgf
14.03.2021 23:16

1. Max - это системная функция/ Не стоит называть таким именем свою.

2. Последнее условие в процедуре не совсем понятно. И для нахождения максимального значения оптимальнее это делать в одном цикле. В PascalABC так вообще можно написать     m:=a.max; и ВСЁ.  Но если хотите как на Pascal -  Я исправил.

3. Функция ищет максимальное значение в массиве.

Pascal

var

maxa:integer;

 procedure Getmax(c:integer; var m:integer);

 var

   i:integer;

   a: array [1..100] of integer;

 begin

for i:=1 to c do begin

     a[i]:= random (20);

     write(a[i],' ');

     if m<a[i] then

       m:=a[i];

   end;  

   writeln;

 end;

begin  

 Getmax(100,maxa);

 writeln('Max=', maxa);

end.

0,0(0 оценок)
Ответ:
hshndnsyub
hshndnsyub
28.10.2020 19:09
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4СИАВРАПВЫП АКВЕГ ЕНГО КЕН ЦУК НГА ОАПРО ПАВ ПАВ ПВАП ВФВЫ ЫВААРОРОЛНГ КЕН6 ФЫВА К4
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота