Решение задачи №4 из главы 9

Задача №4 из главы 9

Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.

var a, b, c: integer; // секция объявления переменных
begin  // начало тела программы
    writeln('vvedite cislo A');
    readln(a);
    writeln('vvedite cislo B');
    readln(b);
    writeln('vvedite cislo C');
    readln(c);
    if ((A and B) > 17) and (C > 7)  then // если истина
      writeln('da')
    else
      writeln('net');// если ложно
    readln(); // удерживаем консоль
end. // конец тела программы  
vedro-compota's picture

((A and B) > 17) and (C > 7)

-- это не верно.

  1. Вы проверяли это для разных чисел?
  2. Каков результат работы программы для чисел 12, 5 и 7?

Попытайтесь переделать самостоятельно, если не выходит -- спрашивайте.

_____________
матфак вгу и остальная классика =)

gani84's picture

Не совсем понятно можете пояснить? Вы эту задачу пропустили по моему http://fkn.ktu10.com/?q=comment/2496#com...

gani84's picture

1) Программа работает для разных чисел
2)

Каков результат работы программы для чисел 12, 5 и 7?

результат будет false -- net

vedro-compota's picture

Тогда другой вопрос, чему по-вашему равно значение подвыражения: (12 and 5) ?

_____________
матфак вгу и остальная классика =)

gani84's picture

Значение равно 4 я на калькуляторе в виндоус подсчитал

vedro-compota's picture

Число A и число B больше 17

речь о:

(A > 17) AND (B > 17)

_____________
матфак вгу и остальная классика =)

gani84's picture

var a, b, c: integer; // секция объявления переменных
begin  // начало тела программы
    writeln('vvedite cislo A');
    readln(a);
    writeln('vvedite cislo B');
    readln(b);
    writeln('vvedite cislo C');
    readln(c);
    if (A > 17) and (B > 17) and (C > 7) then // если истина
      writeln('da')
    else
      writeln('net');// если ложно
    readln(); // удерживаем консоль
end. // конец тела программы
vedro-compota's picture

решение засчитано.

_____________
матфак вгу и остальная классика =)