Напишите программу которая находит минимальное число из введенных n чисел

Question

Напишите программу которая находит минимальное число из введенных n чисел

Comments

Пять сек

---

жду)

---

Как то так

Answer 1

Program fdf;
uses crt;
var a,i:real;
begin
readln(a);
I:=a;
while a<>-9999
do begin
readln(a);
if iend;
writeln(i);
end.


(Для справки -9999 число для окончания цикла)

Comments

спасибо большое)))

---

пожалуйста