Pascal abc исправьте ошибки, в моей программе. выбрать для конкурса человека ростом от 172 до 184см или весом от 70 до 80 кг. program konkyrs; var a,b: integer; begin writeln ('вводим число'); readln (a,b); if (a> =172) then if (a< =184) or if (b> =70) then if (b< =80) then writeln ('подходит для конкурса') else writeln ('не подходит для конкурса') else writeln ('не подходит для конкурса') end.

program konkyrs;

var
a,b:integer;
BEGIN
writeln ('введите рост и вес участника через пробел');
readln(a,b);
if (a>=172) and (a<=184) then
begin
if (b>=70) and (b<=80) then writeln('подходит для конкурса')
else writeln ('не подходит для конкурса');
end
else writeln ('не подходит для конкурса');
readln;
END.

 ошибка была в том что надо использовать вместо or (или) оператор and (и) ,а еще были пропущены точка с запятой после команды else ...