сервис вопросов и ответовНайдите количество двузначных чисел, которые делятся на сумму своих цифр.Pascal ABC
5-9 класс|
|
Богиня31
16 янв. 2017 г., 18:52:13 (7 лет назад)
Knyajeva
16 янв. 2017 г., 21:00:19 (7 лет назад)
Чувак, я не знаю паскаля, в коде могут быть ошибки синтакисиса. По сути так:
begin
var count : integer;
for var i := 10 to 99 do
if i mod (i mod 10 + i div 10) < 1 then count := count + 1;
end;
Это PascalABC.Net, вроде я не ошибся.
Ответить
Другие вопросы из категории
Помогите пожалуйсто решить очень срочно прошу!!!!!!! 1. Чему равны значения переменных r, a, d?
a:=5; b:=20; c:=-7;
d:=2.5;
r := a+(4*b+c)*d;
a:= a+4;
d:=a*7;
2. В пяти тестовых опросах мальчик получил оценки. Составьте программу, которая определит среднее значение оценок, полученных мальчиком в пяти опросах.
3*. Задача. «Покупка в магазине»
Человек делает в магазине покупки. Определите сколько денег у него останется после покупки в магазине перчаток стоимостью А руб., портфеля стоимостью B руб. и галстука стоимостью D руб. Все исходные данные задаются с клавиатуры.
Исходные данные.
a — стоимость перчаток;
b — стоимость портфеля;
d — стоимость галстука;
dengi — количество денег у человека.
Все эти переменные будут вещественного типа.
Результат.
ostatok — количество денег, которое останется у человек (вещественный тип).
Метод решения.
ostatok = dengi – a – b – d
Написать программу, реализующую данную задачу
Помогите пожалуйсто решить очень срочно прошу!!!!!!!
Помогите пожалуйста!В коробке лежат 26 бриллиантов,из которых один природного происхождения,остальные-его копии,изготовленные в лаборатории.Массы
искусственных бриллиантов одинаковы,масса природного немного меньше.Придумайте план действий для нахождения природного бриллианта за три взвешивания на чашечных весах без гирь.Запишите свои рассуждения используя связку "если ...,то..."
Читайте также
Решите 2 программы. 1) Найдите количество двухзначных чисел, которые делятся на сумму своих цифр. 2) Составьте программу вычисления
количества трехзначных чисел, у которых сумма цифр является чётным числом.
ОЧЕНЬ СРОЧНО!!!
Нужна помощь в составлении алгоритма (паскаль АВС) -8 класс.
1 задание: Составьте программу вычисления количества двухзначных чисел,которые кратны 2 и 3.
2 задание: Составьте программу,выводящую на экран все двузначные числа,у которых первая цифра в два раза больше второй.
3 задание: Найдите количество двузначных чисел,которые делятся на сумму своих цифр.
P.S. Помогите пожалуйста! Очень нужно и срочно! Если можете,то нужно всё сделать; если же нет,то хотя-бы одну или две задачи. Заранее спасибо!!!)))
1.Составьте программу, выводящую на экран все двухзначные числа, у которых сумма цифр равна 8.
2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!
Напишите программу, которая подсчитывает количество двузначных чисел в заданной последовательности натуральных чисел.Программа получает на вхо
д количество чисел в последовательности, а затем сами числа.Количество чисел не превышает 1000. Введённые числа не превышают 30 000.Программа должна вывести одно число – количество двузначных чисел в заданной последовательности натуральных чисел.
Решите,пожалуйста,хотя бы одну из данных задач:
1)Написать программу,подсчитывающую сумму положительных из трех данных чисел.
2)Напечатать те из двузначных чисел которые делятся на 4,но не делятся на 6.
СРОЧНО!!!
Вы находитесь на странице вопроса "Найдите количество двузначных чисел, которые делятся на сумму своих цифр.Pascal ABC", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.