Генератор случайных чисел+таблица Опции

[tory]

Вот такое:
Использовать генератор случайных чисел для задания знвчений х,у в пределах от -2 до 2.
Для любых комбинаций х,у указать, попадают ли точки с координатами х,у в окружность радиусом
r=1с центром в начале координат. Результат оформить в виде таблицы и вывести на принтер и экран дисплея

[Lapp]

Использовать генератор случайных чисел для задания знвчений х,у в пределах от -2 до 2.

Значения целые или действительные?

[tory]

Значения целые или действительные?

Я иак думаю, что если для всех, то целые. Иначе их же будет бесконечное множество

[мисс_граффити]

а сколько их всего нужно?
создаешь массив размера 2*n (или 2 одномерных массива 1*n).
Заполняешь его. Каждое число будет задаваться Random(4)-2.
выводишь таблицу в виде
x1 x1 x1 x1 x2 x2 x2...
y1 y2 y3 y4 y1 y2 y3...
Перебираешь все комбинации и смотришь, какие попадают в окружность...
если попало - дописываешь "да", если не попало - нет. Можешь в массив сохранять.
в итоге имеешь:

Код

x1   x1   x1   x1   x2   x2   x2...
y1   y2   y3   y4   y1   y2   y3...
да    да   нет   нет   да    нет   да...

На каком этапе проблема?

Сообщение отредактировано: мисс_граффити - 26.10.2006 16:12

[Lapp]

Каждое число будет задаваться Random(4)-2.

Это даст числа от -2 до +1. Нужно Random(5)-2

[tory]

как сформировать таблицу?
Должны быть не просто цифры, а все как положено- шапка, обозначения граф и т.д.

[мисс_граффити]

самое простое - сначала написать что-то вроде (не знаю, как именно ты хочешь рисовать):

writeln('------------------------------------------------------------------------------------------------');
writeln('|                                        таблица!!!                                        |');
writeln('------------------------------------------------------------------------------------------------');

ну, количество символов сам посчитай, чтобы аккуратненько было.

[tory]

вот написал такое

x,y: integer;
begin
	randomize;
	x:=random(5);
	x:=x-2;
	y:=random(5);
	y:=y-2;
	if sqr(x)+sqr(y)>1 then 
	writeln('не входит в окружность');
	else
	writeln('входит в окружность');
	readln;
end.

как теперь заполнить таблицу? Да к тому же еще и все возможные значения

Пользуйся тегами! Про новые теги читай в Новостях

Сообщение отредактировано: lapp - 3.11.2006 2:52

[мисс_граффити]

прочитай, что тебе УЖЕ написали.
а потом задавай конкретные вопросы - что именно непонятно.
не знаю, как остальные, а я не люблю повторять одно и то же по 20 раз в попытке угадать, что человек хочет узнать.