Яскачала программу camstudio 2.0 и включила снимание экрана, а оно снимает только какой-то квадратик, тоесть ту или иную часть, но не весь экран, как сделать на весь экран?

Надо расширить квадрат в настройках или на экрана или скачай fraps или bandican

1) var a,b,c,d,e,f,g: real;

    begin

      readln(a,b,c,d,e,f,g);

      writeln(a*b*c*d*e*f*g);

    end.

2) var a,i,s: integer;

    begin

      s: =1;

      a: =0;

      for i: =1 to 7 do begin

        a: =a+1;

        s: =a*s;

                              end;

    writeln(s);

  end.

вот программы. по ним составь блок схемы. 

     

     

program ms3o1; {пишу по памяти-не судите строго за ошибки}

var n,i,j,p,o,n: integer;

begin

n: =0; {тут у нас будут ноли}

o: =0; {тут отрицательные}

p: =o; {и тут соответственно положительные}

writeln('введите кол-во целых чисел для проверки'); readln(n);

for i: =1 to n do

begin

writeln('введите число: '); readln(j);

if j=0 then n: =n+1;

if j> 0 then p: =p+1;

if j< 0 then o: =o+1;

end;

writeln('отрицательных: ',o);

writeln('положительных: ',p);

writeln('равны ноль: ',n);

readln;

end.