Срочно! Дано трехзначное число. Если сумма цифр этого числа превышает 15, то…

Question

69

Срочно! Дано трехзначное число. Если сумма цифр этого числа превышает 15, то вывести эту сумму. Иначе вывестипроизведение цифр этого числа.

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

ответить

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

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

sky · Accepted Answer

53

sky

24 февраля 2024

var a: integer; s,s1: integer; begin readln (a); s: =(a div 100)+(a mod 100) div 10)+(a mod 100) mod 10); s1: =(a div 100)*(a mod 100) div 10)*(a mod 100) mod 10); if s>15 then writeln (s) else writeln (s1); end.

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

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

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

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