Writeln ( product ) 3 страница

write('принадлежит')

write('не принадлежит')

При проверке работы программа выполнялась по шагам для некоторых контрольных значений х и y, при этом был заполнен протокол тестирования, содержащий следующую информацию.

Область - часть плоскости, которой принадлежит проверяемая точка (все

возможные области отмечены на рисунке буквами А, В, С, ... W).

Условие 1, Условие 2, Условие 3 - результат проверки соответствующего условия (да или нет). Если условие не проверялось, в протокол записывался прочерк.

Вывод - сообщение, которое вывела программа. Если программа ничего не вывела, в протокол записывался прочерк.

Верно - итоговое заключение (да или нет) о правильности результата работы программы при данных значениях х и у.

В результате неаккуратного обращения протокол был испорчен, частично сохранились только три строки:

Последовательно выполните следующее.

1. Восстановите уцелевшие строки протокола, заполнив все клетки таблицы. Там, где содержание восстанавливается неоднозначно, запишите любое возможное значение. Например, если для нескольких областей получается одинаковая строка таблицы, укажите в графе «Область» любую из этих областей.

2. Укажите, как нужно доработать программу, чтобы не было случаев её неправильной работы (это можно сделать несколькими способами, достаточно указать любой способ доработки исходной программы).

41) Требовалось написать программу, при выполнении которой с клавиатуры считываются коорди наты точки на плоскости (х, у - действительные числа) и определяется принадлежность этой точки заданной закрашенной области (включая границы). Ученик написал такую программу:

var x, y: real;

readln(x,у);

if у >= x*x-6 then begin

if x*x + у* у <=16 then

write('принадлежит')

if x >= 0 then

write('принадлежит')

else write('не принадлежит')

При проверке работы программа выполнялась по шагам для некоторых контрольных значений х и у, при этом был заполнен протокол тестирования. В результате неаккуратного обращения протокол был испорчен, частично сохранились только четыре строки:

Графы протокола содержат следующую информацию.

Область - часть плоскости, которой принадлежит проверяемая точка. (Все возможные области отмечены на рисунке буквами А, В, С, ... S.)

Условие 1, Условие2, Условие 3 - результат проверки соответствующего условия (да или нет). Если условие не проверялось, в протокол записывался прочерк.

Вывод – сообщение, которое вывела программа. Если программа ничего не вывела, в протокол записывался прочерк.

Верно - итоговое заключение (да или нет) о правильности результата работы программы при данных значениях х и у.

Последовательно выполните следующее.

1. Восстановите уцелевшие строки протокола, заполнив все клетки таблицы. Там, где содержание восстанавливается неоднозначно, запишите любое возможное значение. Например, если для нескольких областей получается одинаковая строка таблицы, укажите в графе «Область» любую из этих областей.

2. Укажите, как нужно доработать программу, чтобы не было случаев её неправильной работы. (Это можно сделать несколькими способами, достаточно указать любой способ доработки исходной программы.)

42) Требовалось написать программу, при выполнении которой с клавиатуры считываются координаты точки на плоскости (х, у - действительные числа) и определяется принадлежность этой точки заданной закрашенной области (включая границы). Ученик написал такую программу:

var x, y: real;

readln(x,y);

if y >= 1-x then begin

if y <= 2-2*x*x then

write('принадлежит')

if y >= x*x-5 then

write('принадлежит')

else write('не принадлежит')

При проверке работы программа выполнялась по шагам для некоторых контрольных значений х и у, при этом был заполнен протокол тестирования. В результате неаккуратного обращения протокол был испорчен, частично сохранились только четыре строки:

Графы протокола содержат следующую информацию.

Область - часть плоскости, которой принадлежит проверяемая точка. (Все возможные области отмечены на рисунке буквами А, В, С, ... R.)

Условие 1, Условие2, Условие 3 - результат проверки соответствующего условия (да или нет). Если условие не проверялось, в протокол записывался прочерк.

Вывод – сообщение, которое вывела программа. Если программа ничего не вывела, в протокол записывался прочерк.

Верно - итоговое заключение (да или нет) о правильности результата работы программы при данных значениях х и у.

Последовательно выполните следующее.

1. Восстановите уцелевшие строки протокола, заполнив все клетки таблицы. Там, где содержание восстанавливается неоднозначно, запишите любое возможное значение. Например, если для нескольких областей получается одинаковая строка таблицы, укажите в графе «Область» любую из этих областей.

2. Укажите, как нужно доработать программу, чтобы не было случаев её неправильной работы. (Это можно сделать несколькими способами, достаточно указать любой способ доработки исходной программы.)

43) Требовалось написать программу, при выполнении которой с клавиатуры считываются координаты точки на плоскости (х, у - действительные числа) и определяется принадлежность этой точки заданной закрашенной области (включая границы). Ученик написал такую программу:

var x, y: real;

readln(x,y);

if y >= x+1 then begin

if y <= 2-2*x*x then

write('принадлежит')

if y >= x*x-5 then

write('принадлежит')

else write('не принадлежит')

При проверке работы программа выполнялась по шагам для некоторых контрольных значений х и у, при этом был заполнен протокол тестирования. В результате неаккуратного обращения протокол был испорчен, частично сохранились только четыре строки:

Графы протокола содержат следующую информацию.

Область - часть плоскости, которой принадлежит проверяемая точка. (Все возможные области отмечены на рисунке буквами А, В, С, ... R.)

Условие 1, Условие2, Условие 3 - результат проверки соответствующего условия (да или нет). Если условие не проверялось, в протокол записывался прочерк.

Вывод – сообщение, которое вывела программа. Если программа ничего не вывела, в протокол записывался прочерк.

Верно - итоговое заключение (да или нет) о правильности результата работы программы при данных значениях х и у.

Последовательно выполните следующее.

1. Восстановите уцелевшие строки протокола, заполнив все клетки таблицы. Там, где содержание восстанавливается неоднозначно, запишите любое возможное значение. Например, если для нескольких областей получается одинаковая строка таблицы, укажите в графе «Область» любую из этих областей.

2. Укажите, как нужно доработать программу, чтобы не было случаев её неправильной работы. (Это можно сделать несколькими способами, достаточно указать любой способ доработки исходной программы.)

44) В корзине лежит a красных и b синих шаров. Из корзины наугад вынимают n шаров. Требовалось написать программу, которая определяет количество вариантов такого опыта (вариантом считаем пару чисел: количество вынутых красных и синих шаров). Программист торопился и написал программу неправильно:

var n, a, b: integer;

readln(n, a, b);

if a + b < n then writeln(0)

if a < b then

if a < n then writeln(a+1)

if b < n then writeln(b+1)

else writeln(n+1);

Последовательно выполните следующее:

1. Определите, что выведет программа при n = 5, a = 3, b = 6.

2. Укажите значения n, a, b, при которых программа выдаёт неправильный ответ.

3. Укажите, как нужно доработать программу, чтобы не было случаев её неправильной работы.

45) Требовалось написать программу, при выполнении которой с клавиатуры считывается натуральное число N, не превосходящее 10⁹, и выводится произведение цифр этого числа. Программист торопился и написал программу неправильно:

var N, product: longint;

digit: integer;

readln(N);

product := N mod 10;

while N >= 10 do begin

digit := N mod 10;

product := product * digit;

N := N div 10

end;