Регистрация
elviradonchuk
18.02.2021 09:56
Информатика
Есть ответ 👍

Написать програму для обчислення добутків виду (х-1)(х-2)(х--n) (p.s скласти програму и блок схему)

254
408
Посмотреть ответы 2

Ответы на вопрос:

Aiden131
Aiden131
4,8(27 оценок)

var

i,n,x: integer;

p: longint;

begin

write ('x = '); readln(x);

repeat

write ('n = '); readln(n);  

until (n> 0);

p: =1;  

for i: =1 to n do p: =p*(x-i);

writeln ('proizvedenie: ',p);

readln;

end.

drfast555
drfast555
4,6(66 оценок)
1байт -8 битов; в слове мама есть буква м одна буква это 8 битов

Популярно: Информатика