Дано трехзначное натуральное число. Найти разность между заданным числом и суммой его...

Question

Дано трехзначное натуральное число. Найти разность между заданным числом и суммой его цифр. написать рограмму в паскале
ПОЖАЛУЙСТА до завтра нужно

Answer 1

Var obs,n:integer;
begin
writeln('Введите трехзначное число');
readln(n);
obs:=n-((n div 100)+(n div 10 mod 10)+(n mod 10));
writeln('Разность между заданным числом и суммой его цифр = ',obs);
end.

---

Скачать вложение Текст (TXT)