Если тут причастна двоичная система счисления, то пистолет это 10000111111 10000111000 10001000001 10001000010 10000111110 10000111011 10000110101 10001000010
Ну а пистолет в квадрате, возвести в 2ст(наверное так))
2.
var x,y:real;
Begin
write('Vvedite chislo x: ');
readln(x);
writeln('y1= ',power(x,8));
writeln('y2= ',power(x,10));
writeln('y3= ',power(x,15));
writeln('y4= ',power(x,19));
readln;
End.
3.
var
a1,a2,b1,b2:integer; // a1,a2 - первая дробь, b1,b2 - вторая
Begin
write('Vvedite pervuy drob: ');
readln(a1,a2);
write('Vvedite vtoryy drob: ');
readln(b1,b2);
writeln('Chislitel= ',a1+b1);
writeln('Znamenatel= ',a2+b2);
readln;
End.
Ну в принципе, правильные ответы - первый и третий.
Var s:string;
begin
readln(s);
if odd(length(s)) then delete(s,length(s) div 2+1,1)
else delete(s,length(s) div 2,2);
writeln(s)
<span>end.</span>