Программирование алгоритмов линейной структуры. : найдите эдс,индуцированную в первичной обмотке трансформатора с числом витков w,если он подключен к сети переменного напряжения частотой f,а магнитный поток в магнитопроводе-ф.e=4.44fw ф.исходные данные f=400гц,ф=1,25*10 в минус 4 bб

Могла бы и написать чему равен исходный W
ну да ладно))
вот:
uses crt;
var
E,f,w,magprovod:real;
begin
writeln('Исходные данные:');
write('f=');
read(f);
write('w=');
read(w);
write('magprovod(только число без степени десятки)=');
read(magprovod);
E:=4.44*f*w*magprovod*(1/10/10/10/10);
write(ЭДС равно=',E);
end.
З.Ы.magprovod=Ф, просто f уже есть, а русские паскаль не воспринимает)))