Вопрос по информатике:
Паскаль.Дано двузначное число m и некоторое число k.Определить равна ли сумма цифр числа m числу k
- 04.07.2018 13:07
- Информатика
- remove_red_eye 8251
- thumb_up 49
Ответы и объяснения 1
Program qq;
uses crt;
var
m,k,a,b,d,c:integer;
begin
readln(m,k);
a:=m mod 10;
b:= (m div 10) mod 10;
c:=(m div 10) div 10;
d:=a+b+c;
if k=d then Writeln('Да') else Writeln('Нет');
Readkey;
End.
- 05.07.2018 08:46
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.