Электрон, ускоренный разностью потенциалов 8 кв, влетает в однородное магнитное поле под углом 60° к направлению магнитного поля и движется по винтовой линии с шагом 10 см. найти (в мтл) индукцию магнитного поля.

Var x,i,n: integer; begin x: =1; write('введите натуральное число: '); read(n); write('простые делители числа ',n,': '); for i: = 1 to n do   if n mod i = 0 then   begin   write(i: 4);   x: =x*i;   end; writeln; writeln('их произведение: ',x); end.