сервис вопросов и ответовДаны два натуральных числа.Выяснить в каком из них сумма цифр больше.(Определить функцию для расчета суммы цифр натурального числа)
5-9 класс|
|
Opium3
25 февр. 2017 г., 23:21:49 (7 лет назад)
генчик
26 февр. 2017 г., 0:11:08 (7 лет назад)
var a, b: integer;
function sum(c: integer): integer;
var s: string;
i, r: integer;
begin
r := 0;
s := inttostr(c);
for i := 1 to length(s) do
r := r + strtoint(s[i]);
result := r;
end;
begin
readln(a, b);
if (sum(a) > sum(b)) then writeln('A > B')
else if (sum(a) = sum(b)) then writeln('A = B')
else writeln('A < B');
end.
I ♥ functions :)
Ответить
Другие вопросы из категории
1) Папка оправляемых писем
в программе Outlook Express
2) Основным
техническим средством используемым в
информационной системе,
является
Читайте также
Помогите, пожалуйста, если можно подробно.
Действие компьютерного вируса состоит в том, что вместо букв "б", "в", "л", "о", "т" печатаются цифры, кроме цифры 0, причем разным буквам соответствующие разные цифры.
Выясните какие цифры каким буквам соответствуют, если известно, что:
1) сумма цифр слова "бот" равна 8;
2) сумма цифр слова "вол" равна 9;
3) сумма цифр слова "болт" равна 11;
4) сумма цифр слова "лото" равна 12.
Действие компьютерного вируса состоит в том, что вместо
букв «б», «в», «л», «о», «т» выводятся цифры, кроме цифры
0, причём разным буквам соответствуют разные цифры.
Выясните, какие цифры каким буквам соответствуют, если
известно, что:
1) сумма цифр слова «бот» равна 8;
2) сумма цифр слова «вол» равна 9;
3) сумма цифр слова «болт» равна 11;
4) сумма цифр слова «лото» равна 12.
1) Компьютерный вирус А заполняет 1 ГБАЙТ за 1 месяц, вирус В за 2 месяца , вирус С , за 3 месяца , а вирус D за шесть месяцев. На компьютере установлены
все 4 вируса. Сколько ГИГАБАЙТОВ они заполнят за 1 месяц.
2) Действие компьютерного вируса состоит в том, что вместо букв "б", "в", "л", "о", "т". выводятся цифры кроме цифры 0, причем разным буквам соответствуют разные цифры. Выясните,какие цифры каким буквам соответствуют, если известно что :
1)сумма цифр слова "бот" равна 8 ;
2) сумма цифр слова "вол" равна 9;
3)сумма цифр слова "болт " равна 11
4)сумма цифр слова лото равна 12
Пожалуйста решите, буду благодарна))))) Действие компьютерного вируса состоит в том, что вместо букв «б», «в», «л», «о», «т» печатаются цифры, кроме циф
- ры 0, причём разным буквам соответствуют разные цифры. Выясните, какие цифры каким буквам соответствуют, если известно, что: 1) сумма цифр слова «бот» равна 8; 2) сумма цифр слова «вол» равна 9; 3) сумма цифр слова «болт» равна 11; 4) сумма цифр слова «лото» равна 12.
1)Даны два целых числа A и B (A < B). Найти сумму квадратов всех целых чисел
от A до B включительно.
2)Даны натуральные числа от A до B(A<B). Найти произведение тех из них, которые делятся на 3 и не делятся на 4.
3)Ангелина узнав, что Боря занимается спортом, решила не отставать. Она каждый день делала от 3 до 5 упражнений на икры (вводится во время выполнения программы) и 5 упражнений на пресс. Сколько упражнений она сделала за 5, 10 и 13 дней. (количество упражнений на икры на каждый день вводится отдельно)
Вы находитесь на странице вопроса "Даны два натуральных числа.Выяснить в каком из них сумма цифр больше.(Определить функцию для расчета суммы цифр натурального числа)", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.