ПОМАГИТЕ! на языке паскаль:
В танцевальный коллектив набирают учеников, измеряя их вес V и
рост R. В коллектив пройдут только те, у которых V<=R-100.
Запросите вес и рост претендента и дайте ответ, пройдет ли он в
танцевальный коллектив.

Предыдущий
вопрос Следующий
вопрос

program DanceCollective;

var
weight, height: integer;

begin
writeln('Введите вес претендента: ');
readln(weight);
writeln('Введите рост претендента: ');
readln(height);

if weight <= height - 100 then
writeln('Претендент проходит в танцевальный коллектив')
else
writeln('Претендент не проходит в танцевальный коллектив');
end.