В танцевальную студию принимаются юноши и девушки. Для того, чтобы поступить, необходимо, чтобы у юноши: вес <= рост – 110, а у девушки: вес <= рост – 115. Значение пола вводится числом, например 1 или 0. Определить, будет ли принят поступающий в студию.
Program yeah;
var
a,b,c,d,n:integer;
begin
writeln(введите число.(0-юноша,1-девушка).);
readln(n);
if n=0 then begin
writeln(введите вес);
readln(a);
writeln(введите рост);
readln(b);
if b=110 then begin
if a<=b then writeln(юноша принят.);
end;
if a>b then writeln(не подходит по весу.);
if b<>110 then writeln(не подходит по росту.);
end;
if n=1 then begin
writeln(введите вес);
readln(a);
writeln(введите рост);
readln(b);
if b=115 then begin
if a<=b then writeln(девушка принята.);
end;
if a>b then writeln(не подходит по весу.);
if b<>115 then writeln(не подходит по росту.);
end;
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
