Даны n чисел.Вывести на экран наименьшее число.
Даны n чисел.Вывести на экран наименьшее число.
Гость
Ответ(ы) на вопрос:
Гостьvar n,min,i:integer;a:array[1..100] of integer;
begin
read(n);
for i:=1 to n do readln(a[i]);
min:=a[1];
for i:=2 to n do if a[i]
Не нашли ответ?
Похожие вопросы