 Задача о сумме четных чисел. |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| vell |
 30.09.2003 16:05
Сообщение
#1
|
 Группа: Пользователи Сообщений: 4 Репутация:  0   |
Нам задали 15 задач на Pascalе. Я решила 14, но последняя все никак не получается.
 Задача: Дано натуральное число N. Найти сумму четных цифр в данном числе. Если кто знает, как её решать - подскажите, буду очень благодарна. |
   |
 
|
  |
Ответов
| Client |
17.11.2007 21:21
Сообщение
#2
|
|
Профи  Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: 20 |
попробуй так
while (n<>0) and ((n mod 10)<>0) then s:=s+a; сам не пробовал, но вроде должна работь.. Сообщение отредактировано: Client - 17.11.2007 21:33 |
|
|
|
Сообщений в этой теме
vell Задача о сумме четных чисел. 30.09.2003 16:05
APAL Re: Задача о сумме четных чисел. 30.09.2003 16:29 vell Re: Задача о сумме четных чисел. 30.09.2003 18:12 APAL Re: Задача о сумме четных чисел. 1.10.2003 7:44 Ivs Re: Задача о сумме четных чисел. 1.10.2003 13:38 APAL Re: Задача о сумме четных чисел. 1.10.2003 15:28 Ivs Re: Задача о сумме четных чисел. 1.10.2003 18:06 APAL Re: Задача о сумме четных чисел. 2.10.2003 7:06 orko Re: Задача о сумме четных чисел. 2.10.2003 16:19
BE@ST a mozno ety zadachy reshit tak???
vrode rabotaet ... 17.11.2007 21:04 orko Re: Задача о сумме четных чисел. 2.10.2003 16:21 ___ALex___ Re: Задача о сумме четных чисел. 2.10.2003 17:08 APAL Re: Задача о сумме четных чисел. 3.10.2003 15:04 Fire_Rage Re: Задача о сумме четных чисел. 8.10.2003 3:43 Fire_Rage Re: Задача о сумме четных чисел. 8.10.2003 3:44 vell Re: Задача о сумме четных чисел. 23.10.2003 14:33 vell Re: Задача о сумме четных чисел. 23.10.2003 14:35 orko Re: Задача о сумме четных чисел. 25.10.2003 21:56 BE@ST попробуй так
[code=pas]if ((a mod 2)=0)and(a<1... 17.11.2007 21:33 volvo А ты не в курсе, что сумма считается с младших, а ... 17.11.2007 21:48 BE@ST А ты не в курсе, что сумма считается с младших, а... 17.11.2007 21:55 Client если хочешь слева начать то надо найти как-бы разр... 17.11.2007 21:55 volvo 46592 ты не запихаешь в Integer, для начала... Раз... 17.11.2007 21:57 BE@ST 46592 ты не запихаешь в Integer, для начала... Ра... 17.11.2007 22:08 BE@ST 46592 ты не запихаешь в Integer, для начала... Ра... 18.11.2007 19:38 Malice Поставь
var s, a, n: LongInt;для начала. 18.11.2007 19:56 BE@ST Поставь
var s, a, n: LongInt;для начала.
спас... 19.11.2007 8:23 Client я так делал одну задачу, вот и вспомнил
это значи... 17.11.2007 22:02 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 2:30 |