Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.