Написать программу вычисления выражения (3-х) (6-х) (9-х) ... (21-х), где х-натуральное число.

Question

Авдоша

16 декабря, 19:22

+3

Ответы (2)

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

Иосиф · Answer 1

var x, y:integer;

begin

write ('vvedite x:');

readln (x);

Y: = (3-x) * (6-x) * (9-x) * (12-x) * (15-x) * (18-x) * (21-x);

writeln (y);

end.

Саверий · Answer 2

Восопользуся Algo на паскале или Delghi 6.0