Форум программистов, компьютерный форум, киберфорум
Basic
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Basic Одномерный массив в Basic https://www.cyberforum.ru/ basic/ thread1891480.html
Удалите в целочисленном массиве все положительные числа, которые являются палиндромами. Помогите составить программу в Turbo Basic.
Преобразование Excel в PDF Basic
Есть скрипт который выполняется после нажатии кнопки генерировать или по шедулеру в определённое время (как неважно) копирует файл ексель на другой диск и присваивает ему имя в формате даты. Dim...
Basic Счастливо ли число
Четырехзначное число называется счастливым, если сумма двух его цифр равна сумме двух последних. Ваша программа должна читать четырехзначное число и определять, счастливо ли оно.
Basic Удалить все столбцы матрицы, содержащие только положительные элементы Прошу помощи с задачей. Дана матрица, содержащая как положительные, так и отрицательные элементы. Удалить все ее столбцы, содержащие только положительные элементы. https://www.cyberforum.ru/ basic/ thread1890656.html
Basic Массив https://www.cyberforum.ru/ basic/ thread1889368.html
Дан массив x из n элементов. Найдите x1-x2+x3-...-xn-1+xn В Turbo Basic
Basic Создание массива
Удалите в целочисленном массиве все положительные числа, которые являются палиндромами. Помогите составить программу в Turbo Basik.
Basic Построение графика
Помогите построить график z=f(y) (0<=x<=4p) y=0.3sin0.5x*0.2cos5x z=cos x
Basic Turbo Basic- массивы 1. Удалите в целочисленном массиве все положительные числа, которые являются палиндромами. 2.Составить программу, которая в двумерном массиве случайных чисел элементы всех четных строк делает... https://www.cyberforum.ru/ basic/ thread1888762.html
Basic Алгоритмизация и программирование https://www.cyberforum.ru/ basic/ thread1888518.html
1.Задана функция: https://www.cyberforum.ru/attachment.php?attachmentid=779479&stc=1&d=1482682153 Значение х изменяется от 0 до 6. Составить алгоритм её вычисления. 2. При значениях N=5 и А1=4,...
Basic Решение задачи с двумерным массивом Составить блок схему и текст программы: Найти вектор Y, каждая компонента которого равна количеству отрицательных элементов соответствующего столбца матрицы X. Матрица X: {-3.4 15.1 -19.2/ 12 16.3... https://www.cyberforum.ru/ basic/ thread1886974.html
28 / 25 / 1
Регистрация: 06.01.2017
Сообщений: 282
21.01.2017, 13:15 0

Дано двузначное число. Определить, кратна ли трем сумма его цифр

21.01.2017, 13:15. Просмотров 945. Ответов 10
Метки (Все метки)

Ответ

Задача была о проверке на кратность 3 не самого числа, а суммы его цифр

Добавлено через 15 часов 2 минуты
Иначе говоря, надо вставить ещё пару операторов:

N1 = nX \ 10 ' первая цифра двузначного числа, получается делением числа на 10 и отбрасыванием остатка
N2 = nX - 10 * N1 ' вторая цифра двузначного числа, получается вычитанием из числа его первой цифры, умноженной на 10

Тут выше употреблен оператор MOD - не уверен, что во всех реализациях Бэйсика этот оператор имеет место быть.
Вообще-то, это из Паскаля, там в базовой (а значит и во всех последующих) есть операторы целого деления MOD и DIV.

Вернуться к обсуждению:
Дано двузначное число. Определить, кратна ли трем сумма его цифр
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.01.2017, 13:15

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Макрос: определить элементы матрицы, сумма индексов которых кратна трем
Взять матрицу M x N. Определить элементы, сумма индексов которых кратна трем. Выделить их...

Дано трехзначное число. Проверить, будет ли сумма его цифр четным числом
Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом. Пожалуйста напишите как...

Найти двузначное число, равное утроенному произведению его цифр
найти двузначное число равное утроенному произведению его цифр я вот решаю не получается: Dim T,...

Дано натуральное число n. Составить программу, подсчитывающую количество цифр числа n, сумму его цифр
не могу понять как посчитать сумму цифр веденного числа

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