Помощь - Поиск - Пользователи - Календарь
Полная версия: Сумма цифр, сумма элементов последовательности
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
блондиночка
15.05.2007 22:03
Помогите пожалуйста,
до завтра надо решить эти проклятые задачи, а я не сильно рублю в паскале......((((

я думаю для некоторых они будут несложными....

1) Написать программу поиска двузначных чисел, обладающих св-вом: если к сумме цифр чсла прибавить квадрат этой суммы то получится снова данное число. результат вывести на экран

2)операторы цикла с постусловием

дана непустая последовательность натуральных чисел за которой следует 0. Вычислить сумму положительных элементов последовательности, порядковые номера которых нечетны. результат вывести на экран.


кто поможет тому (заранее) огромные СПАСИБКИ!!!!, хотябы часть какую-нить напишите, помогите блондинке....

unsure.gif unsure.gif unsure.gif
klem4
15.05.2007 22:05
М
 Советую очень внимательно прочитать правила форума и изменить название темы, иначе она будет закрыта.

Гость
15.05.2007 22:07
а как?


и на что изменить?



и где правила?
klem4
15.05.2007 22:11
Чтобы ты могла изменять свои сообщения, надо зарегистрироваться: http://forum.pascal.net.ru/index.php?act=Reg&CODE=00


Правила: http://forum.pascal.net.ru/rules.html
nikki
15.05.2007 22:19
слушай я все-равно не понм=иаю как я терь могу изменить эту тему(((((((




моть ты сам поменяешь? на название типа постусловие или подобное этому....... smile.gif

СПАСИБО БОЛЬШОЕ))))) Осталось только решение найти ((((((
klem4
15.05.2007 22:22
Сделано ... Воспользуйся поиском, похожие задачи решались.
nikki
15.05.2007 22:24
Цитата(klem4 @ 15.05.2007 19:22) *

Сделано ... Воспользуйся поиском, похожие задачи решались.



спасибо, сейчас попробую)))

но пишите кто че знаед!!!!!))))) всем всем всем СПАСИБОЧКИ!!!!!! smile.gif smile.gif smile.gif

Добавлено через 6 мин.
ничего не найти неудобный у вас ПОИСК norespect.gif , слушай модер klem4 а ты рубишьв паскале? слушай помоги пожалуйста, аиначе учитель по инфе завтра 2 в полугодии поставит, и усе тогда((((


arhimag
15.05.2007 22:42
задача №1
Код
var a, b : integer;
begin
  for a:= 1 to 9 do
    for b:= 0 to 9 do
      if (a+b+(a+b)*(a+b))=a*10+b then
        writeln(a,b);
  readln;
end.

задача №2
Код
var a, b, i : integer;
begin
  b:=0;
  i:=1;
  repeat
    readln(a);
    if ((i mod 2)=1) and (a>0) then
      inc(b,a);
    inc(i);
  until a=0;
  write(b);
  readln;
end.

Цитата
слушай модер klem4 а ты рубишьв паскале?

Думаю, он "рубит в паскале", лучше твоего препода wink.gif
Цитата
ничего не найти неудобный у вас ПОИСК

Не поиск не удобный, а ты искать не умеешь wink.gif не обижайся.
nikki
15.05.2007 22:56
Цитата
var a, b : integer;
begin
for a:= 1 to 9 do
for b:= 0 to 9 do
if (a+b+(a+b)*(a+b))=a*10+b then
writeln(a,b);
readln;
end.


ты знаешь что ты написал чужь даже я понимаю что это неправильно blink.gif norespect.gif , прочитай повнимательней саму задачу, типа надо чтоб она сама нашла сразу все двузначные числа с этим св-вом и вывела их на экран!!!!! поправь, напиши нормально ПЛЗ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! norespect.gif
klem4
15.05.2007 23:04
nikki

Задача решена верно ...
arhimag
15.05.2007 23:06
Цитата(nikki @ 15.05.2007 19:56) *

ты знаешь что ты написал чужь даже я понимаю что это неправильно blink.gif norespect.gif , прочитай повнимательней саму задачу, типа надо чтоб она сама нашла сразу все двузначные числа с этим св-вом и вывела их на экран!!!!! поправь, напиши нормально ПЛЗ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! norespect.gif

Уважаемая nikki, не могли бы ли вы просветить меня, где программы моего предыдущего поста работают не правильно?
P.S.
Цитата
6. Одна тема - один вопрос (задача)
volvo
15.05.2007 23:08
nikki dry.gif Ты бы СНАЧАЛА внимательно всмотрелась, в то, что тебе предложили, а потом уже показывала свои знания языка... Что, если выложили все, что тебе нужно - можно уже всем гадости говорить? dry.gif

nikki
16.05.2007 0:43
ты её проверял? она нашла три числа(12, 42, 90) ?????????? blink.gif



и никого я не обсираю
Айра
16.05.2007 0:51
Цитата
ты её проверял? она нашла три числа(12, 42 ...) ??????????

А сколько их, по-твоему, должно быть? Таких чисел всего три (12, 42, 90), так что программа работает правильно..
Не очень умная блондиночка
16.05.2007 1:07
Здравствуйте, напишите пожалуйста программку нахождения факториала...
мисс_граффити
16.05.2007 1:09
Здравствуйте, Не очень умная блондиночка!
Пожалуйста, не надо создавать сообщения с новым вопросом в чужих темах.
Функции для нахождения факториала выкладывались не раз, воспользуйтесь поиском.

Кроме того, не стоит создавать несколько аккаунтов. Один из них все равно будет удален (определяйтесь с цветом волос и говорите, какой...)
Не очень умная блондиночка
16.05.2007 1:13
Цитата(мисс_граффити @ 15.05.2007 22:09) *

Здравствуйте, Не очень умная блондиночка!
Пожалуйста, не надо создавать сообщения с новым вопросом в чужих темах.
Функции для нахождения факториала выкладывались не раз, воспользуйтесь поиском.

Кроме того, не стоит создавать несколько аккаунтов. Один из них все равно будет удален (определяйтесь с цветом волос и говорите, какой...)

Оставьте пожалуйста это аккаунт, а тот удалите...больше не буду нарушать правила...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.