88

Вы ввели трехзначное число. Затем ввели любое число а. Составьте программу,…

18 февраля 2023

Вы ввели трехзначное число. Затем ввели любое число а. Составьте программу, определяющую, равна ли сумма цифр числа задоному числуа помогите срочно! Контруха по инфе

категория: информатика

80

Var a, b, c, i: integer; d: string; begin readln (a, b); d: =inttostr (a); for i: =1 to length (d) do c: =c+strtoint (d[i]); if (b=c) then writeln ('Yes') else writeln ('No'); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...