Условие: Вычислите, в какой координатной четверти расположен треугольник, образованный прямой, заданной уравнением y=ax+b, и осями координат.
Технические условия: Стандартные.
Примеры входных и выходных файлов: Отсутствуют.
Решение: Идея решения. Если в уравнении прямой угловой коэффициент положительный, то прямая лежит либо во второй, либо в четвертой четверти, при этом если свободный член положительный, то во второй, а если отрицательный - то в четвертой. Значит там же находится и весь треугольник, так как он образован этой прямой и осями координат. Аналогично рассуждаем и для отрицательного углового коэффициента: при положительном свободном члене - первая четверть, а при отрицательном - третья.
var a,b :real; begin write('y=a*x+b: введите a и b ...'); readln(a,b); if (a=0) or (b=0) then writeln('Треугольника не существует!') else begin if (a>0) and (b>0) then writeln('Треугольник находится во II четверти.'); if (a>0) and (b<0) then writeln('Треугольник находится в IV четверти.'); if (a<0) and (b>0) then writeln('Треугольник находится в I четверти.'); if (a<0) and (b<0) then writeln('Треугольник находится в III четверти.'); end; end.
На олимпиаде я оформила решение похожей задачи (вычислите,в какой координатной четверти расположен треугольник, образованный прямой, заданной уравнениемy=ax+b, и осями координат. Числаaиbтакие, что треугольник всегдасуществует.Формат входных данных:входной файлINPUT.TXTсодержит заданные целые числаaиbФормат выходных данных:Выходной файлOUTPUT.TXTсодержатьномер четверти). Но получила 0 баллов.
program zad_c; var input, output:text; a,b,c: integer; begin assign (input,'input.txt'); reset (input); assign (output,'output.txt'); rewrite (output); read (input,a, b); if b>0 then begin if a>0 then c:=2 else c:=1 end else if a<0 then c:=3 else c:=4; write(output,c); close(input);close(output); end.
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ]
