Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Найти число являются квадратами некоторого числа M, Снова я =)) |
| Blackli |
Сообщение
#1
|
 Новичок  Группа: Пользователи Сообщений: 24 Пол: Женский Репутация:  0   |
Эт снов я +))))
В прошилый раз мне здесь помогли.. =)))))) итак, суть моей проблемки.. Даны целые положительные числа a1, a2, a3, .. ,an. Найти среди них те, которые являются квадратами некоторого числа m Apal просил не забывать ваш форум.. =) Хи.. :p2: Сообщение отредактировано: Blackli - |
   |
 
|
Blackli Найти число являются квадратами некоторого числа M 26.11.2004 20:48
Altair А можно перебором?
тогда так:
const
n=20;
var
m… 26.11.2004 20:54 volvo Oleg_Z
Заметь, даны только a1, a2, a3, .. ,an... … 26.11.2004 20:57 FreeMan
var
a,m,n,i:word;
begin
write('a1,a2.… 26.11.2004 20:58 Blackli Спасибки в очередной раз =)) блин.. кое как нашла … 27.11.2004 21:53 Dark ЛОООООЛ =) 27.11.2004 22:06 Altair ЛООООЛ!
Blackli, заходи к нам!
Не забывай… 27.11.2004 23:11 Blackli
(^_^) Хочу! Хотя у меня свой форум есть.. )) … 28.11.2004 16:49 APAL По поводу обновление - надо MJ упросить... когда с… 28.11.2004 17:08 Altair RE: Найти число являются квадратами некоторого числа M 28.11.2004 17:21
Флогримм
а адрнсочек то, адресочек? 29.11.2004 10:16  |
|
Текстовая версия | 4.11.2025 16:42 |
