помогите пожалуйста по информатике, я пробовал, но чет не то вписываю в формулу

 ТАК
помогите пожалуйста по информатике, я пробовал, но чет не то вписываю в формулу
В школу танцев принимаются юноши и девушки, имеющие рост не ниже 168 см и не выше 178 см. Их вес должен соотноситься с ростом по формуле: значение веса < (знвчение роста-115). Определите, будет ли поступающий принят в школу танцев. Можете написать пожалуйста программу.

Ответы:

Станислав Жуков
Var a,b,c,a1,b1: real; begin a:=168; b:=178; write('Введите рост - '); readln(a1); write('Введите вес - '); readln(b1); if (a1b) then writeln('Предендент не может вступить в школу так как его рост не соответствует нормам.') else begin if b1>a1 then writeln('Предендент не может вступить в школу так как его вес не соответствует нормам.') else writeln('Человек может вступить в школу.'); end; end. PS код нормально не сохраняется пиши в лс

Krab Bark
https://otvet.mail.ru/question/197618201