Показать сообщение отдельно
Старый 26.11.2012, 22:19   #1 (permalink)
bosyak
Новичок
 
Регистрация: 26.11.2012
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию Помогите найти ошибку в програме Delphi

program Project1;
uses
Var
a,b,y1,y2,y3:real;
begin
Readln(a);
Readln(b);
y1=a+3;
y2=a/2+3;
y3=a-6;
if ((a>-5)and(a<-3)and(y1=b))or
((a>0)and(a<6)and(y2=b))or
((a>6)and(a<9)and(y3=b))
then Writeln('yes')
else Writeln('no');
Readln;
end.







задание
Используя имеющиеся в наличии задания, разработать программу, позволяющую определить по введенным с клавиатуры
координатам точки:принадлежит ли данная точка графику функции.
извените график кинуть не могу =(
кто поможет спасёт жизнь бедному студенту
bosyak вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070