• Помогите решить задачу на PASCAL ABC вот задача Даны числа A, B, C. Проверьте, выполняется ли условие, что все три числа двузначные. вводные данные 1) 35 35 35 выводные true вводные 2) 35 3 5 выводные false 3) вводные 99 99 -99 выводные TRUE срочно надо пж ребят

Ответы 6

  • переделанная строчка , не увидела про минусы условие if (a>=10) and (a<=99) and (b>=10) and (b<=99) and (c>=10) and (c<=99) and (a<=-10) and (a>=-99) and (b<=-10) and (b>=-99) and (c<=-10) and (c>=-99) then
  • я не много изменил и получилось правильно if (a>=10) and (a<=99) and (b>=10) and (b<=99) and (c>=10) and (c<=99) or (c<=-9) and (c>=-100)or (b<=-9) and (b>=-100) then СПАСИБО
    • Автор:

      bobpis8
    • 5 лет назад
    • 0
  • дааа ойй
  • Лучше такvar a, b, c : integer ;beginreadln(a,b,c);if (((a^2)^1/2)>=10) and (((a^2)^1/2)<=99) and (((b^2)^1/2)>=10) and (((b^2)^1/2)<=99) and (((c^2)^1/2)>=10) and (((c^2)^1/2)<=99) thenwrite('true') else write('false')end.
  • Я не помню поддерживает ли квадраты, но идея вы поняли
    • Автор:

      skylar
    • 5 лет назад
    • 0
  • var a, b, c : integer ;

    begin

    readln(a,b,c);

    if (a>=10) and (a<=99) and (b>=10) and (b<=99) and (c>=10) and (c<=99) then

    write('true')

    else write('false')

    end.

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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