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

begin

var(v,r):=ReadInteger2;

if V<=R-100 then Println('Пройдет')

else Println('Не пройдет')

end.