Важная информация
Показано с 1 по 3 из 3

Тема: Помогите составить программу для нахождения суммы цифр целого числа

  1. #1  
    Новичок
    Регистрация
    08.12.2010
    Сообщений
    4
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    ТЕМА: Литеры

    Задача:

    1. Составить программу для нахождения суммы цифр целого числа, состоящего из не более 80 цифр.

    ИЛИ

    2. Строка текста содержит английские и русские слова, разделенные пробелом. Составить программу подсчета английских слов.

    Нужно только одну :|
    ПОЖАЛУЙСТА :(
    Два часа просидела, а все равно ничего не получилось
    Ответить с цитированием  
     

  2. #2  
    Гуру Аватар для Konstantin Shcherba
    Регистрация
    08.11.2010
    Сообщений
    1,336
    Сказал(а) спасибо
    26
    Поблагодарили 139 раз(а) в 107 сообщениях
    Записей в блоге
    1
    Вот так мне представляется первая задачка:
    Код qbasic:
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] "Vvedite chislo: ", X$
    IF [Ссылки могут видеть только зарегистрированные пользователи. ](X$) < 80 THEN
      [Ссылки могут видеть только зарегистрированные пользователи. ] "Summa cifr: ";
      Summa = 0
      FOR I = 1 TO [Ссылки могут видеть только зарегистрированные пользователи. ](X$)
        Cifra = [Ссылки могут видеть только зарегистрированные пользователи. ]([Ссылки могут видеть только зарегистрированные пользователи. ](X$, I, 1))
        Summa = Summa + Cifra
        [Ссылки могут видеть только зарегистрированные пользователи. ] Cifra;
        IF I < [Ссылки могут видеть только зарегистрированные пользователи. ](X$) THEN
          [Ссылки могут видеть только зарегистрированные пользователи. ] "+";
        ELSE
          [Ссылки могут видеть только зарегистрированные пользователи. ] "="; Summa
        [Ссылки могут видеть только зарегистрированные пользователи. ] IF
      NEXT I
    ELSE
      [Ссылки могут видеть только зарегистрированные пользователи. ] "Chisel > 80"
    [Ссылки могут видеть только зарегистрированные пользователи. ] IF
    Ответить с цитированием  
     

  3. #3  
    Новичок
    Регистрация
    08.12.2010
    Сообщений
    4
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    спасибо! :)

    вы мне очень сильно помогли!!!
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Ответов: 0
    Последнее сообщение: 14.02.2012, 20:36
  2. Ответов: 1
    Последнее сообщение: 14.01.2012, 08:07
  3. Ответов: 8
    Последнее сообщение: 30.10.2011, 11:29
  4. Ответов: 7
    Последнее сообщение: 28.04.2011, 00:14
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •