йствительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. Программист торопился и написал программу неправильно. Вот она: var x,y: real; begin readln(x,y); if y=0 then if y>=x+1 then write(‘принадлежит’) else write(‘не принадлежит’) end. Последовательно выполните следующее: 1) приведите пример таких чисел x, y, при которых программа неверно решает поставленную задачу; 2) укажите, как нужно доработать программу, чтобы не было случаев ее неправильной работы; это можно сделать несколькими способами, поэтому можно указать любой способ доработки исходной программы.
Источник: uznavalka.pro
Даю 99 поинтов.Программа на Паскале: Требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (x,y –действительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. Программа была написана неправильно.var x,y: real;begin readln(x,y);if y=0 thenif y>=+1 thenwrite(‘принадлежит’)elsewrite(‘не принадлежит’)end(Точки с запятой и точки не стоят, я знаю).При каком(-их) значении(-ях) х и у программа выполняется неправильно?a. x = 0; y = -1;b. x=0; y=1;c. x=1; y=2;d. x = 1,5; y = -10,5;
ЕГЭ по информатике 2014 Задача С1
program point_in;
var
x, y: real;
function ParabolicY(x: real): real;
begin
ParabolicY := -1 * x * x + 2 * x;
end;
begin
readln(x, y);
if ( (x < 0) or (x >1) ) or ( (y < 0) or (y >1) ) then
writeln(‘не принадлежит’)
else
begin
if ( ParabolicY(x) writeln(‘принадлежит’)
else
writeln(‘не принадлежит’);
end;
end.
Источник: uchimsya.com