Question

Срочно пожалуйста!!!Ниже приведена программа, записанная на нескольких языках программирования. Алгоритмический язык Паскаль алг нач цел a, b ввод a ввод b если a mod 2=0 и b>10 то вывод “Да“ иначе вывод “Нет“ все кон var a, b: integer; begin readln (a); readln (b); if (a mod 2=0) and (b>10) then writeln (‘Да‘) else writeln (‘Нет‘) end. Было проведено 10 запусков программы, при которых в качестве значений переменных a, b вводились пары чисел: (10; 5), (-10; 15), (1; 2), (11; 2), (12; 1), (10; 12), (-12; -11), (-12; 11), (10; 10), (-11; 12). Сколько было запусков, при которых программа напечатала «Да».

Answer 1

Ответ:

3 cказало да, 7 сказало нет.

var a,b,v,c,k: integer;

begin

v:=0;

repeat

v:=v+1;

readln (a);

readln (b);

if (a mod 2=0) and (b>10)

then c:=c+1

else k:=k+1

until v = 10;

writeln ('c:=',c,' k:=',k);

readln

end.

Объяснение:

Инструкция:

Вбиваем первое число из скобки, потом второе.

повторить алгоритм со второй скобки и с третьей и так далее пока не покажет итог

c <- Да

k <- Нет

Answer 2

Давайте проверим каждую пару чисел из предоставленных данных и определим, сколько раз программа напечатала «Да».

1. (10; 5): a = 10, b = 5. a mod 2 = 0, но b не больше 10. Вывод: "Нет".
2. (-10; 15): a = -10, b = 15. (-10) mod 2 = 0, но b больше 10. Вывод: "Да".
3. (1; 2): a = 1, b = 2. 1 mod 2 = 1, условие не выполняется. Вывод: "Нет".
4. (11; 2): a = 11, b = 2. 11 mod 2 = 1, условие не выполняется. Вывод: "Нет".
5. (12; 1): a = 12, b = 1. 12 mod 2 = 0, но b не больше 10. Вывод: "Нет".
6. (10; 12): a = 10, b = 12. 10 mod 2 = 0, и b больше 10. Вывод: "Да".
7. (-12; -11): a = -12, b = -11. (-12) mod 2 = 0, но b не больше 10. Вывод: "Нет".
8. (-12; 11): a = -12, b = 11. (-12) mod 2 = 0, и b больше 10. Вывод: "Да".
9. (10; 10): a = 10, b = 10. 10 mod 2 = 0, и b больше 10. Вывод: "Да".
10. (-11; 12): a = -11, b = 12. (-11) mod 2 = 1, условие не выполняется. Вывод: "Нет".

Таким образом, программа напечатала "Да" три раза: при вводе пар чисел (-10; 15), (10; 12) и (-12; 11).