Вопрос пользователя:
Написать программу на паскале: У юного фермера Тимы 5 кроликов. Определите минимальный вес кроликов(вес каждого задать произвольно)
Илюха отвечает:
var a: array [1..5] of real;
i: integer;
min: real;
begin
min:=1000;
for i:=1 to 5 do begin
readln(a[i]);
if a[i] end; writeln(‘Минимальный вес равен ‘,min); end.