Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Renner
0 / 0 / 0
Регистрация: 27.05.2014
Сообщений: 37
1

Построение множества отрезков на одной прямой

17.06.2014, 01:10. Просмотров 306. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program tardis;
uses GraphABC;
Var 
i,x,y :integer;
begin
x:=1;
y:=1;
line(5,400,5,5);
line(5,400,400,400);
setpencolor(clred);
for i:=1 to 400 do;
begin
line(x-2+i,y+400-i+1,x-1+i,y+400-i);
end;
end.
Программа должна строить один отрезок за другим и в результате должна получится одна прямая. Что не так? он вообще ничего не строит
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.06.2014, 01:10
Ответы с готовыми решениями:

Построение числовой прямой
Подскажите как правильно построить числовую прямую, а конкретно как управлять...

Построение множества Жюлиа
Постройте множество Жюлиа для функции h(z)=f(z)*g(z), где f(z)=z2+0,1+0,1i и...

Определить, лежат ли точки на одной прямой
подскажите, я написал код, но если ввести координаты при которых точки не лежат...

Выяснить лежат ли эти точки на одной прямой
Даны координаты трех точек на плоскости. Выяснить лежат ли эти точки на одной...

Даны длины трех отрезков. Определить, можно ли из этих отрезков сложить треугольник?
Даны длины трех отрезков. Определить, можно ли из этих отрезков сложить...

1
erl27
894 / 742 / 832
Регистрация: 06.09.2013
Сообщений: 1,561
17.06.2014, 02:50 2
Цитата Сообщение от Renner Посмотреть сообщение
for i:=1 to 400 do;
После do поставлена точка с запятой, а это значит конец оператора.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program tardis;
 
uses
  GraphABC;
 
var
  i, x, y: integer;
 
begin
  x := 1;
  y := 1;
  line(5, 400, 5, 5);
  line(5, 400, 400, 400);
  setpencolor(clred);
  for i := 1 to 400 do
  begin
    line(x - 2 + i, y + 400 - i + 1, x - 1 + i, y + 400 - i);
  end;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.06.2014, 02:50

Даны длины трех отрезков. Определить, можно ли из этих отрезков сложить треугольник
помогите ещё одну задачу)

Выяснить, лежат ли две точки в одной полуплоскости относительно заданной прямой
Даны действительные числа x, y. Точки с координатами (x,y),(x,y),(x,y)...

Определить минимальное подмножество точек, после удаления которых останутся точки лежащие на одной прямой
задано множество точек на плоскости,не лежащих на одной прямой.Определить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru