Вопрос по информатике:
Даны 3х и 2х значное число сравнить сумму их цыфр
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 23.12.2015 01:57
- Информатика
- remove_red_eye 11988
- thumb_up 43
Ответы и объяснения 1
var
a,b:integer;
s1,s2:byte;
begin
ClrScr;
Write('Введите 3-х значное число: '); Read(a);
Write('Введите 2-х значное число: '); Read(b);
s1:=a div 100+(a div 10) mod 10+a mod 10;
s2:=b div 10+b mod 10;
if s1>s2 then Writeln('Сумма цифр 3-х значного числа больше')
else
if s2>s1 then Writeln('Сумма цифр 2-х значного числа больше')
else Writeln('Суммы цифр обоих чисел одинаковы');
ReadKey
end.
Пример
Введите 3-х значное число: 513
Введите 2-х значное число: 97
Сумма цифр 2-х значного числа больше
- 24.12.2015 09:00
- thumb_up 49
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.