Составьтепрограмму вычисления в массиве B (N) минимального среди положительных…

Question

68

Составьтепрограмму вычисления в массиве B (N) минимального среди положительных элементов и его номера

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

alway · Accepted Answer

75

alway

01 апреля 2023

Const N=10; var a: array [0… N] of integer; i, m: integer; begin for i: =0 to N do a[i]: =random (1000) — 500; { Надо же что-то в массив закинуть=) } for i: =0 to N do if (a[i] > 0) and (a[i] > a[m]) then m: =i; writeln ('[', m, '] => ', a[m]); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: