для конкурсного отбора манекенщиц приглашаются девушки не ниже 180 см. определить будет ли допущена таня к участию в конкурсе
Answers & Comments
Bakalavr
Program test; var r:real; begin write('Введите рост манекенщицы: '); readln(r); if r>180 then writeln('Манекенщицa допущена к участию в конкурсе') else writeln('Манекенщицa не допущена к участию в конкурсе'); end.
Answers & Comments
var r:real;
begin
write('Введите рост манекенщицы: ');
readln(r);
if r>180 then writeln('Манекенщицa допущена к участию в конкурсе')
else writeln('Манекенщицa не допущена к участию в конкурсе');
end.