БАЛЛОВ!)
Определите, что будет напечатано в результате работы программы, если значение переменной f= - 9?
if f>0
then
v := f -12
else
if f =0
then
v := 5
else v := sqr(f);
write (v);

ответ будет -16. Потому-что С++ все плюсует со всеми

если n это количество чисел, начинаем с 3

var

i,n,p: integer

begin

readln(n);

i: =3;

p: =1;

while i< =3*n do

begin

p: =p*i;

i: =i+3;

end;

writeln(p);

end.

если n это верхняя граница чисел

var

i,n,p: integer

begin

readln(n);

for i: =3 to n

if i mod 3 = 0 then

p: =p*i;

writeln(p);

end.

1+2+3-4+5-6=1

1+2+3+4/5+6-7=1

1+2+3-4+5-6+7/8=1