 Задача на подпрограмму, составить задачу |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| eldar219 |
 5.04.2010 20:24
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 34 Пол: Мужской Реальное имя: eldar Репутация:  0   |
Составить программу для нахождения делителей некоторого числа
Плизз помогите как начать решать |
   |
 
|
Сообщений в этой теме
eldar219 Задача на подпрограмму 5.04.2010 20:24
Unconnected Можно так:
Procedure divz(n:integer);
var i:byte;... 5.04.2010 20:51
Lapp for i:=1 to n do if (n mod i=0) then writeln(i);... 6.04.2010 4:18 Unconnected А почему бы и нет?) n тоже является делителем само... 6.04.2010 12:37 volvo Для того, чтобы это показать - совсем не обязатель... 6.04.2010 12:50 Unconnected Вот так:
Procedure divz(n:integer);
var i:byte;
b... 6.04.2010 19:27 Lapp Вот так:
[code=pas] for i:=1 to (n div 2) do if (... 7.04.2010 7:27 TarasBer Можно даже до половины не идти. 7.04.2010 11:23 Lapp Можно даже до половины не идти.Именно так :yes2: ... 8.04.2010 6:21 Unconnected Ммм ну не знаю, я с циклом for ничего больше не пр... 8.04.2010 12:58 Client :lol:
думаю, имелось в виду после цикла сделать w... 8.04.2010 13:04 Unconnected
И как ты себе это представляешь?:) 8.04.2010 13:10 Client for i:=2 to round (sqrt(n) ) 8.04.2010 13:13 Lapp for i:=2 to round (sqrt(n) )Угу )). Только можно ... 8.04.2010 13:40 Client тут возможно:
1) можно включить и единицу
2) возм... 8.04.2010 13:59 TarasBer Народ, автор же ещё даже ни одного ответа не сдела... 8.04.2010 14:13  |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 19.07.2025 22:24 |