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

Question

88

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

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

ответить

в избранное ссылка

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

reqist · Accepted Answer

80

reqist

09 марта 2023

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.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: