Введите рост трёх девочек. Маши, Наташи и Оли, узнайте которая подружка самая маленькая

begin
var a:=ReadReal('Введите рост Маши');
var b:=ReadReal('Введите рост Наташи');
var c:=ReadReal('Введите рост Оли');
if min(a,min(b,c)) = a then Writeln('Маша');
if min(a,min(b,c)) = b then Writeln('Наташа');
if min(a,min(b,c)) = c then Writeln('Оля');
end.