Работа в паскаль! , хелп: 3 1. составьте программу, которая находит сумму n чисел, введенных с клавиатуры. 2.составьте программу, которая вычисляет произведение чисел от 1 до n. значение n вводится с клавиатуры.

1. var s,x,n,i: longint; begin s: =0; readln(n); for i: =1 to n do begin read(x); s: =s+x; end; writeln(s); end. 2. var i, n, p: longint; begin readln(n); p: =1; for i: =1 to n do p: =p*i; writeln(p); end.

19 кбайт (я надеюсь)

Не знаб я швлвлвьвшаьвьаоовь