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

Ответы 1

  • program konkyrs;vara,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 ...  

       

     

    • Автор:

      brooks16
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years