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

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 ...