Для конкурсного отбора манекенщиц приглашаются девушки не ниже 180 см. определить будет ли допущена таня к участию в конкурсе

1

Ответы и объяснения

2014-01-29T10:26:46+00:00
Program test;
var r:real;
begin
write('Введите рост манекенщицы: ');
readln(r);
if r>180 then writeln('Манекенщицa допущена к участию в конкурсе')
else 
writeln('Манекенщицa не допущена к участию в конкурсе');
end.