VPF::Координаты графика! - Форум программистов

NooDleco

Дата 4.6.2006, 21:52 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 4.6.2006

Репутация: нет
Всего: нет

Напечатать координаты точек, попадающих в заштрихованную фигуру, если координата х изменяется от –2.6 до 2.2 с шагом Dх=0.2, а координата у меняется от –2.5 до 2.5 с шагом Dу=0.5.

вот к какому графику

http://img129.imageshack.us/img129/5140/graph6fi.jpg

Есть сама программа только никак не могу правильно подобрать условие.

Код


program rg;
uses graph ;
var a,b:real; c:integer;
begin
a:=-2.6;c:=1;
repeat
b:=-2.5;
repeat
if 
{здесь доолжно быть условие}
then begin
writeln ('(' ,a:4:2, '; ' ,b:4:2, ')');
c:=c+1;
if (C mod 24)=0 then begin
Writeln('Push enter');
readln;
end;
end;
b:=b+0.5;
until b>2.5;
a:=a+0.2;
until a>2.2;
readln;
end.

skyboy

Дата 4.6.2006, 22:31 (ссылка)

(нет голосов)

Загрузка ...

неОпытный

Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260

Код


(x <= 0 AND y>= 0  y<= x + 2) OR (x<= -1 AND y<= x + 2 AND y>= -x - 2)  OR (x>= 0 AND y<= 0 AND y>= -2 AND x<=2 AND (y>= x - 2 OR y>= -x))

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »