diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /608/CH3 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '608/CH3')
-rwxr-xr-x | 608/CH3/EX3.01/3_01.sce | 15 | ||||
-rwxr-xr-x | 608/CH3/EX3.02/3_02.sce | 15 | ||||
-rwxr-xr-x | 608/CH3/EX3.03/3_03.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.04/3_04.sce | 12 | ||||
-rwxr-xr-x | 608/CH3/EX3.05/3_05.sce | 12 | ||||
-rwxr-xr-x | 608/CH3/EX3.06/3_06.sce | 12 | ||||
-rwxr-xr-x | 608/CH3/EX3.07/3_07.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.08/3_08.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.09/3_09.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.10/3_10.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.11/3_11.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.12/3_12.sce | 14 | ||||
-rwxr-xr-x | 608/CH3/EX3.13/3_13.sce | 14 |
13 files changed, 178 insertions, 0 deletions
diff --git a/608/CH3/EX3.01/3_01.sce b/608/CH3/EX3.01/3_01.sce new file mode 100755 index 000000000..f756e01e8 --- /dev/null +++ b/608/CH3/EX3.01/3_01.sce @@ -0,0 +1,15 @@ +//Problem 3.01: The resistance of a 5 m length of wire is 600 ohms. Determine (a) the resistance of an 8 m length of the same wire, and (b) the length of the same wire when the resistance is 420 ohms.
+
+//initializing the variables:
+R = 600; // in ohms
+L = 5; // in meter
+L1 = 8; // in meter
+R2 = 420; // in ohms
+
+//calculation:
+R1 = R*L1/L
+L2 = R2*L/R
+
+printf("\n\nResult\n\n")
+printf("\n(a)Resistance %.0f Ohms",R1)
+printf("\n(b)Length: %.1f meters(m)\n",L2)
\ No newline at end of file diff --git a/608/CH3/EX3.02/3_02.sce b/608/CH3/EX3.02/3_02.sce new file mode 100755 index 000000000..927c3434e --- /dev/null +++ b/608/CH3/EX3.02/3_02.sce @@ -0,0 +1,15 @@ +//Problem 3.02: A piece of wire of cross-sectional area 2 mm2 has a resistance of 300 ohms. Find (a) the resistance of a wire of the same length and material if the cross-sectional area is 5 mm2, (b) the cross-sectional area of a wire of the same length and material of resistance 750 ohms.
+
+//initializing the variables:
+R = 300; // in ohms
+A = 2; // in mm2
+A1 = 5; // in mm2
+R2 = 750; // in ohms
+
+//calculation:
+R1 = R*A/A1
+A2 = R*A/R2
+
+printf("\n\nResult\n\n")
+printf("\n(a)Resistance %.0f Ohms",R1)
+printf("\n(b)C.S.A: %.1f mm2\n",A2)
\ No newline at end of file diff --git a/608/CH3/EX3.03/3_03.sce b/608/CH3/EX3.03/3_03.sce new file mode 100755 index 000000000..028ba8c1f --- /dev/null +++ b/608/CH3/EX3.03/3_03.sce @@ -0,0 +1,14 @@ +//Problem 3.03: A wire of length 8 m and cross-sectional area 3 mm2 has a resistance of 0.16 ohms. If the wire is drawn out until its crosssectional area is 1 mm2, determine the resistance of the wire.
+
+//initializing the variables:
+R = 0.16; // in ohms
+A = 3; // in mm2
+L = 8; // in m
+A1 = 1; // in mm2
+
+//calculation:
+L1 = L*3
+R1 = R*A*L1/(A1*L)
+
+printf("\n\nResult\n\n")
+printf("\nResistance %.2f Ohms\n",R1)
diff --git a/608/CH3/EX3.04/3_04.sce b/608/CH3/EX3.04/3_04.sce new file mode 100755 index 000000000..ba6bd1ed8 --- /dev/null +++ b/608/CH3/EX3.04/3_04.sce @@ -0,0 +1,12 @@ +//Problem 3.04: Calculate the resistance of a 2 km length of aluminium overhead power cable if the cross-sectional area of the cable is 100 mm2. Take the resistivity of aluminium to be 0.03E-6 ohm m.
+
+//initializing the variables:
+A = 100E-6; // in m2
+L = 2000; // in m
+p = 0.03E-6; // in ohm m
+
+//calculation:
+R = p*L/A
+
+printf("\n\nResult\n\n")
+printf("\nResistance %.1f Ohms\n",R)
diff --git a/608/CH3/EX3.05/3_05.sce b/608/CH3/EX3.05/3_05.sce new file mode 100755 index 000000000..764985d56 --- /dev/null +++ b/608/CH3/EX3.05/3_05.sce @@ -0,0 +1,12 @@ +//Problem 3.05: Calculate the cross-sectional area, in mm2, of a piece of copper wire, 40 m in length and having a resistance of 0.25 ohms. Take the resistivity of copper as 0.02E-6ohm m.
+
+//initializing the variables:
+R = 0.25; // in ohms
+L = 40; // in m
+p = 0.02E-6; // in ohm m
+
+//calculation:
+A = p*L*1E6/R
+
+printf("\n\nResult\n\n")
+printf("\nC.S.A %.1f Ohms\n",A)
diff --git a/608/CH3/EX3.06/3_06.sce b/608/CH3/EX3.06/3_06.sce new file mode 100755 index 000000000..cc12aea3b --- /dev/null +++ b/608/CH3/EX3.06/3_06.sce @@ -0,0 +1,12 @@ +//Problem 3.06: The resistance of 1.5 km of wire of cross-sectional area 0.17 mm2 is 150 ohms. Determine the resistivity of the wire.
+
+//initializing the variables:
+R = 150; // in ohms
+L = 1500; // in m
+A = 0.17E-6; // in m2
+
+//calculation:
+p = R*A/L
+
+printf("\n\nResult\n\n")
+printf("\nresistivity %.3E Ohm m\n",p)
\ No newline at end of file diff --git a/608/CH3/EX3.07/3_07.sce b/608/CH3/EX3.07/3_07.sce new file mode 100755 index 000000000..ac0a3c3de --- /dev/null +++ b/608/CH3/EX3.07/3_07.sce @@ -0,0 +1,14 @@ +//Problem 3.07: Determine the resistance of 1200 m of copper cable having a diameter of 12 mm if the resistivity of copper is 1.7E-8 ohm m.
+
+//initializing the variables:
+d = 0.012; // in m
+L = 1200; // in m
+p = 1.7E-8; // in ohm m
+pi = 3.14;
+
+//calculation:
+A = pi*d*d/4
+R = p*L/A
+
+printf("\n\nResult\n\n")
+printf("\nresistance %.3f Ohm\n",R)
\ No newline at end of file diff --git a/608/CH3/EX3.08/3_08.sce b/608/CH3/EX3.08/3_08.sce new file mode 100755 index 000000000..a38d5e3eb --- /dev/null +++ b/608/CH3/EX3.08/3_08.sce @@ -0,0 +1,14 @@ +//Problem 3.08: A coil of copper wire has a resistance of 100 ohms when its temperature is 0°C. Determine its resistance at 70°C if the temperature coefficient of resistance of copper at 0°C is 0.0043/°C
+
+//initializing the variables:
+R0 = 100; // in ohms
+T0 = 0; // in °C
+T1 = 70; // in °C
+a0 = 0.0043; // in per°C
+pi = 3.14;
+
+//calculation:
+R70 = R0*[1 + (a0*T1)]
+
+printf("\n\nResult\n\n")
+printf("\nresistance %.1f Ohm\n",R70)
\ No newline at end of file diff --git a/608/CH3/EX3.09/3_09.sce b/608/CH3/EX3.09/3_09.sce new file mode 100755 index 000000000..6be6ce8a8 --- /dev/null +++ b/608/CH3/EX3.09/3_09.sce @@ -0,0 +1,14 @@ +//Problem 3.09: An aluminium cable has a resistance of 27 ohms at a temperature of 35°C. Determine its resistance at 0°C. Take the temperature coefficient of resistance at 0°C to be 0.0038/°C
+
+//initializing the variables:
+R1 = 27; // in ohms
+T0 = 0; // in °C
+T1 = 35; // in °C
+a0 = 0.0038; // in per°C
+pi = 3.14;
+
+//calculation:
+R0 = R1/[1 + (a0*T1)]
+
+printf("\n\nResult\n\n")
+printf("\nresistance %.2f Ohm\n",R0)
\ No newline at end of file diff --git a/608/CH3/EX3.10/3_10.sce b/608/CH3/EX3.10/3_10.sce new file mode 100755 index 000000000..1a7eb6c38 --- /dev/null +++ b/608/CH3/EX3.10/3_10.sce @@ -0,0 +1,14 @@ +//Problem 3.10: A carbon resistor has a resistance of 1 kohms at 0°C. Determine its resistance at 80°C. Assume that the temperature coefficient of resistance for carbon at 0°C is 0.0005/°C
+
+//initializing the variables:
+R0 = 1000; // in ohms
+T0 = 0; // in °C
+T1 = 80; // in °C
+a0 = -0.0005; // in per°C
+pi = 3.14;
+
+//calculation:
+R80 = R0*[1 + (a0*T1)]
+
+printf("\n\nResult\n\n")
+printf("\nresistance %.0f Ohm\n",R80)
\ No newline at end of file diff --git a/608/CH3/EX3.11/3_11.sce b/608/CH3/EX3.11/3_11.sce new file mode 100755 index 000000000..6d5575e3a --- /dev/null +++ b/608/CH3/EX3.11/3_11.sce @@ -0,0 +1,14 @@ +//Problem 3.11: A coil of copper wire has a resistance of 10 ohms at 20°C. If the temperature coefficient of resistance of copper at 20°C is 0.004/°C determine the resistance of the coil when the temperature rises to 100°C.
+
+//initializing the variables:
+R20 = 10; // in ohms
+T0 = 20; // in °C
+T1 = 100; // in °C
+a20 = 0.004; // in per°C
+pi = 3.14;
+
+//calculation:
+R100 = R20*[1 + (a20)*(T1 - T0)]
+
+printf("\n\nResult\n\n")
+printf("\nresistance %.1f Ohm\n",R100)
\ No newline at end of file diff --git a/608/CH3/EX3.12/3_12.sce b/608/CH3/EX3.12/3_12.sce new file mode 100755 index 000000000..c59ced9b7 --- /dev/null +++ b/608/CH3/EX3.12/3_12.sce @@ -0,0 +1,14 @@ +//Problem 3.12: The resistance of a coil of aluminium wire at 18°C is 200 ohms. The temperature of the wire is increased and the resistance rises to 240 ohms. If the temperature coefficient of resistance of aluminium is 0.0039/°C at 18°C determine the temperature to which the coil has risen.
+
+//initializing the variables:
+R18 = 200; // in ohms
+R1 = 240; // in ohms
+T0 = 18; // in °C
+a18 = 0.0039; // in per°C
+pi = 3.14;
+
+//calculation:
+T1 = (((R1/R18)-1)/a18) + T0
+
+printf("\n\nResult\n\n")
+printf("\nTemperature %.2f °C\n",T1)
\ No newline at end of file diff --git a/608/CH3/EX3.13/3_13.sce b/608/CH3/EX3.13/3_13.sce new file mode 100755 index 000000000..f6c7fc3c2 --- /dev/null +++ b/608/CH3/EX3.13/3_13.sce @@ -0,0 +1,14 @@ +//Problem 3.13: Some copper wire has a resistance of 200 ohms at 20°C. A current is passed through the wire and the temperature rises to 90°C. Determine the resistance of the wire at 90°C, correct to thenearest ohm, assuming that the temperature coefficient of resistance is 0.004/°C at 0°C.
+
+//initializing the variables:
+R20 = 200; // in ohms
+T0 = 20; // in °C
+T1 = 90; // in °C
+a0 = 0.004; // in per°C
+pi = 3.14;
+
+//calculation:
+R90 = R20*[1 + (a0*T1)]/[1 + (a0*T0)]
+
+printf("\n\nResult\n\n")
+printf("\nResistance %.0f ohms\n",R90)
\ No newline at end of file |