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

Question

Марлен

20 мая, 12:48

+5

Ответы (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