Форум программистов, компьютерный форум, киберфорум
Наши страницы

QBasic

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 16, средняя оценка - 4.94
Schein
0 / 0 / 0
Регистрация: 28.03.2011
Сообщений: 2
#1

Вывести на экран все трёхзначные числа - QBasic

31.03.2011, 16:52. Просмотров 2311. Ответов 1
Метки нет (Все метки)

Помогите, пожалуйста!
Надо составить программу, выводящую на экран все натуральные трёхзначные числа, делящиеся без остатка на 17, сумма цифр которых равняется 11.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.03.2011, 16:52
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вывести на экран все трёхзначные числа (QBasic):

Вывести на экран все трёхзначные числа, кратные 13 в обратном порядке - QBasic
как в QBasic вывести на экран все трёхзначные числа,кратные 13 в обратном порядке?

Вывести на экран все целые числа от А до Б ,кратные С - QBasic
Вывести на экран все целые числа от А до Б ,кратные С.Или подскажите как записать "кратные С"в Qbasic.Заранее спасибо

Вывести на экран все отрицательные числа массива и их сумму - QBasic
1)Дан массив из 100 элементов. Заполнить его целыми числами в интервале от -20 до 10 и вывести на экран все отрицательные числа и их сумму....

Вывести на экран все натуральные числа, сумма которых не превышает 100 - QBasic
вывести на экран все натуральные числа,сумма которых не превышает 100 Добавлено через 26 минут а так правильно? CLS FOR I = 1 TO...

Даны натуральные числа п и т. Вывести все числа в диапазоне от п до т, которые заканчиваются на 6, 8 или 9 - QBasic
Даны натуральные числа п и т. Вывести все числа в диапазоне от п до т, которые заканчиваются на 6, 8 или 9.

Вывести на экран все значения функции - QBasic
Для заданной функции f(x)=(x-1)2(2x+4) (f(x)=(x-1)в квадрате(2x+4) ) вывести на экран все значения функции находящейся в диапазоне ,...

1
softmob
1248 / 698 / 155
Регистрация: 20.02.2010
Сообщений: 1,035
31.03.2011, 17:05 #2
PureBasic
1
2
3
4
5
6
7
8
9
FOR i = 100 TO 999
    a = i
    s = 0
    DO
        s = s + a MOD 10
        a = a \ 10
    LOOP UNTIL a = 0
    IF i MOD 17 = 0 AND s = 11 THEN PRINT i
NEXT
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.03.2011, 17:05
Привет! Вот еще темы с ответами:

Вывести на экран 5 первых цифр числа - QBasic
собственно дано любое число, необходимо вывести на экран первые 5 его цифр. напишите кто знает)

Заполните массив (7,7) и вывести на экран числа больше 20 - QBasic
Заполните массив (7,7) и вывести на экран числа больше 20.Массив в интервале от 0 до 100 Добавлено через 6 минут Язык Qbasic

Даны числа a, b, c. Если все они равны нулю, вывести об этом сообщение, если среди чисел нет нулей, найти и вывести их произведение, в противном случа - Basic
Всем привет. Будьте добры, подсобите в написании программки: "Даны числа a, b, c. Если все они равны нулю, вывести об этом сообщение,...

Вывести все простые числа в диапазоне от n до m - QBasic
Даны натуральные числа n и m. Вывести все простые числа в диапазоне от n до m.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.