Домашнее задание 10 класс

[Григорий Матеюнас]

Здравствуйте,задали составить програмку в паскале,а я не знаю как её сделать,помогите пожалуйста.

Нужно сгенерировать 10 точек, Х принадлежит промежутку (1;79), У принадлежит (1;24).Нужно вывести все точки на экран разным цветом.
Заранее благодарен.

[Григорий Матеюнас]

Сам я совсем не бум-бум в Паскале,но планирую в нём разобраться .

[domovou]

initgraph(d,m,'');
randomize;
for i:=1 to 10  do
     begin
     x:=random(79)+1;
     y:=random(24)+1;
     putpixel(x,y,random(15)+1);
     end;
closegraph;

[Григорий Матеюнас]

Сообщение от domovou

initgraph(d,m,'');
randomize;
for i:=1 to 10  do
     begin
     x:=random(79)+1;
     y:=random(24)+1;
     putpixel(x,y,random(15)+1);
     end;
closegraph;

А есть ещё варианты?

[Poma][a]

А есть ещё варианты?

А есть слова благодарности?

[Serge_Bliznykov]

А есть ещё варианты?

нет.
Вам предложено краткое и полностью соответствующее заданию решение.
всё остальное будет вариации на данном базисе.


а вот про вежливость забывать не стоит... Некрасиво!

[Sciv]

А есть ещё варианты?

А ты с этим уже разобрался?

[Poma][a]

Нужно вывести все точки на экран разным цветом.

putpixel(x,y,random(15)+1);

(Болд мой)
Нет гарантии что цвет каких-то точек не будет одинаковым..

полностью соответствующее заданию решение.

Так что не полностью

[Григорий Матеюнас]

Разобрался я с этим.Хотел просто узнать вдруг есть ли ещё что-то.

[Poma][a]

Мне кажется или человек реально нарывается на полный игнор со доброй части форумчан?