Ребят нужна программа в паскале для вычисления произведения вида (x-n) ,где n=1(переменная цикла).
Программу проверяйте сразу на компе, мне нужная рабочая.

1
А можно подробнее условие узнать? А то задание неоднозначно можно понимать

Ответы и объяснения

2014-04-02T07:02:16+04:00
Var x, n, z: real;

begin

n := 1;

writeln('Введите число х');
readln(x);

z := x-n;

writeln(z);

end.