Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ записи, текстовое и графическое решение

Автор: Катюша 25.07.2005 2:22

Даны n окружностей на плоскости, заданных координатами своих
центров и радиусами. Найти все окружности, вложенные в самую
большую окружность. Использовать ЗАПИСИ. Исходные данные получить
с помощью генератора случайных чисел. Решение проиллюстрировать графически.

Автор: volvo 25.07.2005 2:27

Катюша, и все-таки, что именно не получается?

Так дело не пойдет - это не называется "подготовка"... Смысл какой НАМ решать эти задачи? Ты должна решать их... Попробуй, если что не получится - поможем...

Автор: Катюша 25.07.2005 2:38

вы мне покажите решиние.. пожалуйста..

я вообще не знаю, как тут рещать и чего..

а мне уже разбираться и писать новое будет легче..

или это лень все- эти отмазки ваши?

Автор: volvo 25.07.2005 2:45

Цитата(Катюша @ 24.07.05 22:38)
я вообще не знаю, как тут рещать и чего..

А ты возьми лист бумаги и реши задачу сама (графически), а потом попробуй объяснить это компьютеру...

Цитата(Катюша @ 24.07.05 22:38)
или это лень все- эти отмазки ваши?

Ты хорошо подумала, прежде чем это написать? Как ты отреагировала на такой выпад в свой адрес, напомнить? Я буду реагировать ГОРАЗДО жестче... angry.gif

Автор: Катюша 25.07.2005 2:50

я найду Олега тогда и попрошу ему объяснить - что и как писать.. потому что я не программировала, в отличии от вас 2 года.

мне даже простейшую программу написать сложно.

а сроку мне осталось- месяц. :fire:

Автор: mlc 25.07.2005 2:50

Цитата(Катюша @ 24.07.05 22:38)
вы мне покажите решение.. пожалуйста..
я вообще не знаю, как тут рещать и чего..

Короче так, генерируешь по рандому X,Y и R N раз : ). Самая большая окружность (m)– у которой R больше. Дальше находишь все окружности (i), у которых расстояние от центра (Xi,Yi) до (Xm,Ym) + Ri ,будет меньше Rm, рисуешь их другим цветом. Все.
Да, запись используешь для хранения инфы об окружности.

Автор: Катюша 25.07.2005 18:27

я не понимаю mlc того, что Вы написали

Автор: volvo 25.07.2005 19:32

Цитата(Катюша @ 25.07.05 14:27)
я не понимаю mlc того, что Вы написали

Бери книгу по Паскалю и читай работу с записями (Record) и графику...

Автор: Malice 25.07.2005 19:54

Цитата(Катюша @ 25.07.05 14:27)
я не понимаю mlc того, что Вы написали
:D
Вот примерно так:
uses crt,graph;
const n=30;
type cir = record
x,y,r:longint;
end;
var i,m:integer;
c:array [1..n] of cir;
begin
{ инициализируем графику }
for i:=1 to n do begin
{ инициализируем случ. значениями структуру c[i] }
circle (c[i].x,c[i].y, c[i].r); { и отрисовываем ее }
if c[m].r<c[i].r then m:=i;
end;

setcolor(4); circle (c[m].x,c[m].y, c[m].r); setcolor(6);
for i:=1 to n do
if (sqrt(sqr(c[i].x-c[m].x)+sqr(c[i].y-c[m].y))+c[i].r)<c[m].r
then circle (c[i].x,c[i].y, c[i].r);
{ закрываем графический режим }
end.

Что не понятно спрашивай smile.gif

Malice, ты тоже, что непонятно - спрашивай angry.gif
Я не увидел твоего ответа, продублируй, плиз, в мыло..
А нет, нашел, теперь понятно..

Автор: Катюша 25.07.2005 20:47

я знаю все операторы.. я не знаю, как их применять и использовать unsure.gif

Автор: Эдгар 10.06.2012 23:28

Цитата(mlc @ 24.07.2005 22:50) *

Дальше находишь все окружности (i), у которых расстояние от центра (Xi,Yi) до (Xm,Ym) + Ri ,будет меньше Rm, рисуешь их другим цветом. Все.
Да, запись используешь для хранения инфы об окружности.

а можешь прописать эту единственную строку или для определения вложенных окружностей

Автор: zithromax without prescription p 26.09.2021 8:50

Meshashringi

Автор: can i buy viagra over the counte 30.10.2021 5:25

Specificity Of Cephalexin For Pept1

Автор: order viagra online canadian no 6.11.2021 11:08

Vytorin And Propecia