1. даны действительные число аи натуральное число n. вычислить р = а (а + + n -1)

DANA3072005 DANA3072005    2   08.06.2019 04:50    1

Ответы
verysadsavant1 verysadsavant1  07.07.2020 14:24
var
  a, P: real;
  n, i: integer;

begin
  P := 1;
  readln(a, n);
  for i := 0 to n - 1 do
    P *= a + i;
  writeln(P);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика