Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Составить алгоритм и программу определения длины никелированного провода диаметром d, который используется для изготовления реостата, имеющего сопротивление R. Удельное сопротивление никелина

Ответ оставил Гость

Удельное электрическое сопротивление никелина 0,40 Ом·мм²/м (или 0,4 * Ом м²/м).
R=ρl/S => l=SR/ρ
S=Π*R^2=Π*(d/2)^2=Π*d^2/4
l=(Π*d^2*R)/(4ρ)
Теперь сама программа
var r,d,l:real;
begin
writeln(Введите сопротивление проводника в Омах);
read(r);
writeln(Введите диаметр проводника в миллиметрах);
read(d);
l:=(3.14*sqr(d)*r)/(4*0.4);
writeln(l:0:2);
end.