Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.96/25: Рейтинг темы: голосов - 25, средняя оценка - 4.96
0 / 0 / 0
Регистрация: 28.03.2011
Сообщений: 11
1

Циклы. Определить является ли сумма максимальной и минимальной цифр кратной числу a.

12.04.2011, 17:52. Показов 4567. Ответов 2
Метки нет (Все метки)

Дано натуральное число.Определить является ли сумма его максимальной и минимальной цифр кратной числу a.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.04.2011, 17:52
Ответы с готовыми решениями:

Даны натуральные числа n и m. Определить, является ли сумма квадратов цифр числа n кратной числу m
Помогите очень долго голову ломал, запутался...:(

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

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

Определить, является ли сумма цифр четырёхзначного числа кратной 10
Определить является ли сумма цифр четырёхзначного числа кратной 10.Нужно использовать mod и div

2
Robin Bad на форуме
237 / 237 / 194
Регистрация: 14.12.2010
Сообщений: 513
12.04.2011, 18:12 2
Лучший ответ Сообщение было отмечено thepeoplecry как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var n,i,a,min,max:integer;
begin
clrscr;min:=10;
writeln('число');
readln(n);
while n>0 do
begin
i:=n mod 10;
n:=n div 10;
if min>i then min:=i;
if max<i then max:=i;
end;
readln(a);
if (min+max)mod a=0 then write('yes')
else write('no');
end.
3
0 / 0 / 0
Регистрация: 28.03.2011
Сообщений: 11
12.04.2011, 18:17  [ТС] 3
Спасибо))
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.04.2011, 18:17

Определить: больше ли сумма максимальной и минимальной цифры чем сумма остальных цифр числа
Дано целое число x (999 &lt; x &lt; 9 000 000). Определить: больше ли сумма максимальной и минимальной...

Определить, является ли разность максимальной и минимальной цифр четным числом
uses crt; var num,min,max,flag: longint; begin clrscr; readln (num); min:=num mod...

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

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

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

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


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

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

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