IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Количество клеток внутри окружности
Dranik7
сообщение 9.10.2010 18:17
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 11
Пол: Мужской

Репутация: -  0  +


Текст задачи:

На клеточной бумаге нарисовали окружность целого радиуса с центром на пересечении линий.
Найти количество клеток, целиком лежащих в этой окружности (напр.: радиус = 3, клеток = 16)

Помогите решить.

Сообщение отредактировано: Dranik7 - 9.10.2010 18:43
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
TarasBer
сообщение 11.10.2010 10:20
Сообщение #2


Злостный любитель
*****

Группа: Пользователи
Сообщений: 1 755
Пол: Мужской

Репутация: -  62  +


Пришлось скопировать этот код себе и запустить.
Оказывается, я забыл одну закрывающуюся скобочку.
Да, смайлофобия даже тут проявилась.


--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Dranik7   Количество клеток внутри окружности   9.10.2010 18:17
TarasBer   c := 0; for i := 1 to r - 1 do inc(c, trunc(sqrt(s...   9.10.2010 18:29
Dranik7   TarasBer, спасибо Есть ли другие способы решений?...   9.10.2010 18:34
volvo   "Помогите" и "решите за меня"/...   9.10.2010 18:39
Dranik7   "Помогите" и "решите за меня...   9.10.2010 18:45
TarasBer   > получается кол-во клеток = 2 в степени радиус...   9.10.2010 18:56
Dranik7   > получается кол-во клеток = 2 в степени радиу...   10.10.2010 20:29
TarasBer   Ты вообще пробовал сам нарисовать окружность на кл...   10.10.2010 21:02
Dranik7   TarasBer, пробовал. Не сдам, т.к. как кое-что все...   10.10.2010 21:06
TarasBer   Оператор inc изучал?   10.10.2010 21:19
Dranik7   Оператор inc изучал? Да. Получается "c...   10.10.2010 22:34
Unconnected   Наоборот, trunc(sqrt(sqr®-sqr(i) нужно сложить с...   10.10.2010 22:48
TarasBer   Мда, если мы сложим trunc(...) с c, а не наоборот,...   10.10.2010 23:42
Lapp   "В окне автобуса поплыл **аный военкомат......   11.10.2010 1:53
TarasBer   > TarasBer, приведенный тобой код может неслабо...   11.10.2010 8:48
Lapp   Я надеюсь на то, что человек таки догадается сравн...   11.10.2010 10:12
TarasBer   Пришлось скопировать этот код себе и запустить. Ок...   11.10.2010 10:20
Lapp   Пришлось скопировать этот код себе и запустить. Ок...   11.10.2010 10:29
TarasBer   Больше ничего не вижу.   11.10.2010 10:53
Lapp   Больше ничего не вижу.Я имел в виду вот, что. sqr...   11.10.2010 11:02
TarasBer   Я про это думал. Под корнем число целое. sqrt от т...   11.10.2010 11:16
Lapp   sqrt от точного целого квадрата ошибки не даёт.Хм....   11.10.2010 11:21
TarasBer   Сам квадратный корень считается точно. procedure ...   11.10.2010 11:38
Lapp   Я не знаю, как там сопроцессор спаян, если там кор...   11.10.2010 12:04


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 21.06.2025 2:08
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"