Дана
последовательность нену­ле­вых вещественных чисел х, за ко­торой сле­дует 0 (0
– признак конца последо­вательности)... Найти минимум из чисел sin(х).

Var a,m:real;
begin
read(a);
m:=sin(a);
while a<>0 do begin if sin(a)write(m);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.