Всем привет, можете Циклы с параметром. Дано натуральное число n. Вычислить произведение (2n-1)*(3n-1)*(4n-1)*...*(10n-1). Составить блок-схему и программу.
-
И циклы с предусловием то же самое. Вычислить произведение (2n-1)*(3n-1)*(4n-1)*...*(10n-1). Составить блок-схему и программу.

64*48*12*8=294,912- обьем в байтах 1 стр

б< т

к< л

с< е

липа ниже березы

к< л< б< т

сосна выше тополя

к< л< б< т< с< е

самое высокое ель

самое низкое клен

за два можно. ложим по 3 монеты. если ровно - то фальшивая среди двух оставшихся, которую легко найти. если неровно - то берём 2 монеты из лёгкой чашки и взвешиваем. если ровно - то оставшаяся и есть фальшивая, если неровно - то фальшивая наверху.

varn,i: integer; x0,y0,x1,y1,x2,y2,s: real; begin readln(n); s: =0; readln(x0,y0); x1: =x0; y1: =y0; for i: =2 to n do begin readln(x2,y2); s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); x1: =x2; y1: =y2; end; x2: =x0; y2: =y0; s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); writeln(s: 10: 2); end.