0 / 0 / 0
Регистрация: 30.09.2016
Сообщений: 34
1

Нахождение двузначных чисел, у которых сумма кубов цифр делится на 3 (постусловие)

24.10.2016, 16:11. Показов 1863. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
составить программу нахождения двузначных чисел у которых сумма кубов цифр делиться на 3
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.10.2016, 16:11
Ответы с готовыми решениями:

Нахождение двухзначных чисел, у которых сумма кубов цифр делится на 3.
Составить программу нахождения двухзначных чисел, у которых сумма кубов цифр делиться на 3.

Подсчет количества двузначных чисел, сумма квадратов цифр которых делится на 13
Составить программу на языке TurboPascal для подсчета количества двузначных чисел, сумма квадратов...

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

Нахождение наименьшего трехзначного числа, сумма кубов цифр которого равна 730
как написать программу, нахождения наименьшего трехзначного числа, сумма кубов цифр которого равна...

2
охотник
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
24.10.2016, 18:48 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
var i:integer;
begin
 i:=9;
 repeat
  inc(i);
  if (((i mod 10)* (i mod 10)*(i mod 10)+(i div 10)*(i div 10)*(i div 10)) mod 3 = 0 )
   then write(i,' ')
  until i>99  
end.
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
7767 / 4596 / 2823
Регистрация: 22.11.2013
Сообщений: 13,074
Записей в блоге: 1
24.10.2016, 22:43 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
var a, b: Integer;
begin
  for a:=1 to 9 do for b:=0 to 9 do
    if (a*a*a+b*b*b) mod 3=0 then Write(' ',a,b);
end.
0
24.10.2016, 22:43
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.10.2016, 22:43
Помогаю со студенческими работами здесь

Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число делится на 6 и 27
Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число...

Найти все четырёхзначные числа, у которых сумма крайних цифр равна сумме средних цифр, а само число делится на 6 и 27.
Помогите решить ещё одну задачку :) Найти все четырёхзначные числа, у которых сумма крайних цифр...

Найти двузначные числа сумма квадратов цифр которых делится на 13
найти двузначные числа сумма квадратов цифр каторых делится на 13 данны n натуральных чисел найти...

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


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru