-
Notifications
You must be signed in to change notification settings - Fork 0
/
9-İkinci Dereceden Bir Bilinmeyenli Denklem Çözümü.fprg
45 lines (45 loc) · 2.22 KB
/
9-İkinci Dereceden Bir Bilinmeyenli Denklem Çözümü.fprg
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
<?xml version="1.0"?>
<flowgorithm fileversion="3.0">
<attributes>
<attribute name="name" value=""/>
<attribute name="authors" value="husey"/>
<attribute name="about" value=""/>
<attribute name="saved" value="2023-08-13 08:47:08 ÖS"/>
<attribute name="created" value="aHVzZXk7SMWhU0VZSU47MjAyMy0wOC0xMzswODozMTo0NSDDllM7Mjc5OQ=="/>
<attribute name="edited" value="aHVzZXk7SMWhU0VZSU47MjAyMy0wOC0xMzswODo0NzowOCDDllM7MjsyOTE0"/>
</attributes>
<function name="Main" type="None" variable="">
<parameters/>
<body>
<declare name="a, b, c, diskriminant, x1, x2" type="Real" array="False" size=""/>
<output expression=""Lütfen sırasıyla a, b ve c değerlerini giriniz."" newline="True"/>
<input variable="a"/>
<input variable="b"/>
<input variable="c"/>
<assign variable="diskriminant" expression="b * b - 4 * a * c"/>
<if expression="diskriminant < 0">
<then>
<output expression=""Gerçel kökü yoktur."" newline="True"/>
</then>
<else>
<if expression="diskriminant > 0">
<then>
<assign variable="x1" expression="-b + (diskriminant ^ 1/2) / (2 * a)"/>
<assign variable="x2" expression="-b - (diskriminant ^ 1/2) / (2 * a)"/>
<output expression=""x1: " & x1 & "x2: " & x2" newline="True"/>
</then>
<else>
<if expression="diskriminant = 0">
<then>
<assign variable="x1" expression="-b / (2 * a)"/>
<output expression=""Bilinmeyen değeriniz: " & x1" newline="True"/>
</then>
<else/>
</if>
</else>
</if>
</else>
</if>
</body>
</function>
</flowgorithm>