Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

среди четырёхзначных чисел найти все числа сумма цифр, которых кратно 3 и больше 15

5-9 класс

Mejrxanmanakba 21 сент. 2016 г., 23:53:14 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Maricjbelushka
22 сент. 2016 г., 1:31:26 (7 лет назад)

uses crt;
var i,s:integer;
begin
for i:=1000 to 9999 do
begin
s:=strtoint(inttostr(i)[1])+strtoint(inttostr(i)[2])+strtoint(inttostr(i)[3])+strtoint(inttostr(i)[4]);
if (s>15) and (s mod 3=0) then
write(i,' ');
end;
end.

Ответить

Другие вопросы из категории

Помогите решить....

Файл размером 4096 байт передаётся через некоторое соединение за 8 секунд. Определите время в секундах, за которое можно передать через то же самое соединение файл размером 8 Кбайт.

Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня (январь – 1 и т.д.). Определить возраст человека (число

полных лет). В случае совпадения указанных месяцев считать, что прошел весь год. Паскаль.

Проверочная работа Составить программы для решение задач Задача 1. Дана

гипотенуза и катет прямоугольного треугольника.

Определить острые углы треугольника. Вывод ответа предусмотреть в градусах с точностью до двух знаков после запятой.

Задача 2. Дано пятизначное число из интервала [100000, 32767]. Найти суммы первой, третьей и пятой цифр этого числа

Зараннее сбасибо

Благодарю

Читайте также

Помогите написать программы >< Задача 1: Среди целых чисел найти минимальное число, которое больше 20 и делится на 17. Задача 2:

Найти максимальное натуральное число меньше 5000, которое делится нацело на 39.

Задача 3: 1 марта в банк положили 1000 руб. Каждый месяц вклад увеличивается на 2% от имеющейся суммы.

а) за какой месяц величина процентной надбавки превысит 30 руб.?

б) через сколько месяцев размер вклада превысит 1200 руб.? Заранее спасибо)

По информатике задали сделать алгоритм:

Из чисел от 10 до 99 вывести те числа, сумма цифр которых равна 5(14,23, 32...)



Вы находитесь на странице вопроса "среди четырёхзначных чисел найти все числа сумма цифр, которых кратно 3 и больше 15", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.