Какие два типа пакетов используют для научных расчётов? Почему нельзя обойтись только одним?

program xxx;

      var i, x, s : integer;

begin

  write('введите число х=');

  readln(x);

  s: =0

  i: =1

  while i < =x do

      begin

          s: =s+i;

          i: =i+2

      end;

  write('сумма нечетных чисел ='; s);  

  readln

end.

1)

var

x,y,s: real;

begin

readln(x,y);

s: =abs(x*y);

writeln(s: 8: 2);

end.

2)

var

a: integer;

begin

readln(a);

if a mod 2=0 then writeln("четное число")

else  writeln("нечетное число")ж

end.

8. дано:

v= 36864 бит/с

1 стр. = 2304 сим* 8 бит = 18 432 бит

4 стр. = 18 432 бит* 4= 73 728 бит = s

t -?

решение.

t= s/v

t= 73728 бит / 36 864 бит/c= 2с.

ответ: 2с.

9. дано:

v=4096 бит/с

t=10 с

n-?

решение.

s=t*v.n=s/16

s=10с*4096 бит/с=40960 бит.

n=40960 бит/ 16=2560 сим.

ответ: 2560 сим.

16*2*60/8 мего байт