Составить программы

1. Вычисления произведения цифр трехзначного числа (используя div и mod)

2. Определения возможности существования треугольника по трём сторонам a, b, c.

3. Определения чётности четырёхзначного натурального числа.

Question

Информатика

Некрас

2 октября, 06:56

Составить программы

1. Вычисления произведения цифр трехзначного числа (используя div и mod)

2. Определения возможности существования треугольника по трём сторонам a, b, c.

3. Определения чётности четырёхзначного натурального числа.

+2

Ответы (1)

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

Офрем · Answer 1

Program vs4; Var n, b, a, c:integer; Begin Writeln ('Введите трехзначное число'); Readln (n); a:=n div 100; b: = (n div 10) mod 10; c: = (n mod 100) mod 10; n:=a+b+c; Writeln ('Сумма цифр данного числа=', n); End.