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

Тема: Помогите решить задачу

  1. #1 Помогите решить задачу 
    Разбирающийся
    Регистрация
    18.11.2011
    Сообщений
    27
    Сказал(а) спасибо
    15
    Поблагодарили 0 раз(а) в 0 сообщениях
    Дано целое число n>3, кратное трём. Найти F=1*3*6*...*n.
    Ответить с цитированием  
     

  2. #2  
    Профи Аватар для Dispetcher14
    Регистрация
    12.12.2010
    Адрес
    Раменское
    Сообщений
    597
    Сказал(а) спасибо
    35
    Поблагодарили 68 раз(а) в 56 сообщениях
    Записей в блоге
    13
    Код qbasic:
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] F, n [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] n
    FOR i = 1 TO n STEP 3
    F = F * i
    NEXT i
    [Ссылки могут видеть только зарегистрированные пользователи. ] F
    "Спокойно, Маша, я Дубровский" (с) Дубровский, "Дубровский".
    Ответить с цитированием  
     

  3. Пользователь сказал cпасибо:

    Дмитрий 1993 (23.01.2012)

  4. #3  
    Разбирающийся
    Регистрация
    18.11.2011
    Сообщений
    27
    Сказал(а) спасибо
    15
    Поблагодарили 0 раз(а) в 0 сообщениях
    Спасибо, но проверьте мой вариант
    INPUT "n", n
    f = 1
    i = 3
    DO WHILE i < 3
    f = f * i
    LOOP
    PRINT "F"; f
    Ответить с цитированием  
     

  5. #4  
    Профи Аватар для Dispetcher14
    Регистрация
    12.12.2010
    Адрес
    Раменское
    Сообщений
    597
    Сказал(а) спасибо
    35
    Поблагодарили 68 раз(а) в 56 сообщениях
    Записей в блоге
    13
    Код qbasic:
    [Ссылки могут видеть только зарегистрированные пользователи. ] "n", n
    f = 1
    i = 3      ' Эту строку убрать
    DO WHILE i < 3     ' Здесь i < 3 заменить на n => 1 
    f = f * i     ' i заменить на n
    'Здесь добавить: n = n - 3
    LOOP
    [Ссылки могут видеть только зарегистрированные пользователи. ] "F", f
    "Спокойно, Маша, я Дубровский" (с) Дубровский, "Дубровский".
    Ответить с цитированием  
     

  6. Пользователь сказал cпасибо:

    Дмитрий 1993 (24.01.2012)

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

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

Похожие темы

  1. Ответов: 0
    Последнее сообщение: 01.07.2012, 22:03
  2. Помогите пожалуйста решить задачу!
    от maiorovleo в разделе QBasic
    Ответов: 1
    Последнее сообщение: 28.04.2012, 14:26
  3. Ответов: 5
    Последнее сообщение: 31.03.2012, 09:34
  4. Помогите решить задачу для практики
    от Антон1111 в разделе Assembler
    Ответов: 0
    Последнее сообщение: 29.03.2012, 17:03
  5. помогите решить задачу на qbasic
    от vetal в разделе QBasic
    Ответов: 3
    Последнее сообщение: 05.03.2012, 21:31
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •