Ответы
Ответ дал:
1
Ответ:
- begin
- var a := ReadArrInteger(50);
- Println('Минимальное:', a.Min);
- end.
Пример работы:
Приложения:
lik18da:
а есть еще способы? можно ли как нибудь заменить ReadArrInteger(50)?
Можно на статический поменять:
var a: array [1..50] of integer;
for var i := 1 to 50 do read(a[i]);
var a: array [1..50] of integer;
for var i := 1 to 50 do read(a[i]);
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад