Katya 17
Удален
|
   
ну я не знаю....прямо мозг какой-то мне бы так правда...неужели все задания по Pascal щелкаешь как орешки!?просто круто.....я конечно понимаю что я уже наглею и может очень не правильно поступаю,но если тебе не сложно помоги еще с одним заданием.....
вот оно:назовем шестизначное число счастливым,если у него сумма первых трех цифр равна сумме последних трех.подсчитать это счастливое число,если сумма трех цифр равна 13!вот я выще буду просто в шоке ,если ты поможешь.....извини,что так нахально прошу!СПАСИБО!
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:13 | IP
|
|
Katya 17
Удален
|
извини я первый раз на этом форуме и вообще на форуме впервые....о каком коде идет речь?
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:16 | IP
|
|
KMA 
Долгожитель
|
 
О простом, о том, что ты хоть что-то пыталась делать. Код, это то, что я тебе написал, когда решил твою задачу. Вот.
(Сообщение отредактировал KMA 17 дек. 2006 18:19)
|
Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 дек. 2006 18:16 | IP
|
|
KMA
Долгожитель
|
Итак, я чего-то задачу не понял... Что нужно сделать. Сказать что билет счастливый или нет??? Или проверить только тот, у которого сумма первых трех равна 13??? Уточни, реально не понятно.
|
Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 дек. 2006 18:18 | IP
|
|
Katya 17
Удален
|
ты знаешь задание ...точнее конец его звучит как...подсчитать счастливое число,у которого сумма трех цифр равна 13....больше ничего не известно.....и огромное спасибо за пояснение....если бы у меня хоть что-нить получалось..хоть кусочек прграммы...то я бы к тебе не обратилась за помощью..хотя бы маленькая часть прогрмаммы..я бы пробовала дальше сама...а тут понимаешь..кошмар..и все...но спасибо за попытки мне помочь...очень трогает!
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:31 | IP
|
|
Katya 17
Удален
|
Ну как...?
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:41 | IP
|
|
KMA
Долгожитель
|
Я рад, что тебя это хоть чуть чуть трогает. Понимаешь, я не пытаюсь помочь, я помогаю (т. к. задачу я тебе решил всю). Это раз. Два, это сама задача. Зачем считать заранее известное число, если сумма цифр дает 13 (ежу же понятно, что общая сумма цифр 26). Так, в общем так, я тебе напишу алгоритм, который проверяет счастливое число или нет, а уж там сообразишь, что надо сделать если сумма трех цифр равна 13.
...
buf:=s; {s это твое 6 значное число, кстати тип должен быть LongInt}
for i:=1 to 3 do
begin
summLast3:=summLast3+ (buf mod 10);
buf:=buf div 10;
end;
{summLast3 -- сумма последних трех чисел твоего билета}
for i:=1 to 3 do
begin
summFirst3:=summFirst3 + (buf mod 10);
buf:=buf div 10;
end;
{summFirst3 -- сумма первых трех чисел}
if summFirst3=summLast3
then writeLn (' Счастливый =) ' )
else writeLn (' Не счастливый');
|
Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 дек. 2006 18:46 | IP
|
|
Katya 17
Удален
|
ПРАВДА реальное огромное СПАСИБИЩЕ ПРЯМО!!вот
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:55 | IP
|
|
Katya 17
Удален
|
скажи а у кого конкретно интересрваться про платное решение заданий..ну на случай если будет надо?
|
Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 дек. 2006 18:57 | IP
|
|
KMA
Долгожитель
|
amigo и я.
Кого выберешь, у того и интресуйся. Лучше всего пиши в личку (сверху есть значок такой "СООБЩЕНИЕ" называется). Можешь у обоих поинтересоваться, и выбрать кто тебе больше понравиться. Вроде еще этим miss graffiti занимается, правда я давно ее здесь не видел.
|
Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 дек. 2006 18:59 | IP
|
|
Форум
Турбо Паскаль. Программирование на Pascal
