программа на паскале
вычислить произведение 1*2*3*4*...*5n
если n=5

а да

можешь еще помочь ?

попробую

вычислить сумму 1+1/2+1/3+1/4+...+1/20+n

аналогично, только :1) var p:real; 2) цикл будет от 1 до 20 и 3) вместо р:=р*i будет p"=p+1/i/ После цикла добавить команду p:=p+n и вывести результат

program proizv; var i,n, p: integer;begin n:=5;p:=1;for i:=1 to n do p:=p*i;write('p=',p)end.