В школу танцев принимаются юноши и девушки, имеющие рост не ниже 168 см. и не выше 178...

Question

В школу танцев принимаются юноши и девушки, имеющие рост не ниже 168 см. и не выше 178 см. Вес претендента должен соотносится с ростом по формуле: значение веса < значение роста. Определите будет ли поступающий принят в школу.

Answer 1

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.