Отметьте справедливые утверждения для машины беббиджа а)использовались перфокарты б)выполняла сложение чисел в)выполняла умножение чисел г)выполняла команду print

1/2cosx/2> 0 cosx/2> 0    -pi/2+2pik< x/2< pi/2+2pik

                                                                                              -pi+4pik< x< pi+4pik - возрастает

cosx/2< 0                             pi/2+2pik< x/2< 3pi/2+2pik                                                                                       

                                                                                                pi+4pik< x< 3pi+4pik - убывает

var a: array [1..10] of integer; maxi,mini,max,min: integer; begin      maxi: =2;       mini: =2;       for i: = 1 to 10 do begin            read(a[i]);             if i=2 then begin                  max = a[i]-a[i-1];                   mix = a[i]-a[i-1];             end;             if i> 2 and max < a[i]-a[i-1] then begin                  max = a[i]-a[i-1];                   maxi = i;             end;             if i> 2 and min > a[i]-a[i-1] then begin                  mix = a[i]-a[i-1];                   mixi = i;             end;       end;       writeln('min: a[',mini,'] - a[',mini-1,'] = ',min);       writeln('max: a[',maxi,'] - a[',maxi-1,'] = ',max); end.