-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathtest.fprg
More file actions
125 lines (124 loc) · 6.14 KB
/
Copy pathtest.fprg
File metadata and controls
125 lines (124 loc) · 6.14 KB
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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
<?xml version="1.0"?>
<flowgorithm fileversion="4.2">
<attributes>
<attribute name="name" value="Es 13"/>
<attribute name="authors" value="PC"/>
<attribute name="about" value="Created with Flowonline2 - PiBOH under AGPL-3.0"/>
</attributes>
<function name="Main" type="None" variable="">
<parameters/>
<body>
<comment text="CONSEGNA
dati 3 numeri in input stampali in ordine decrescente o crescente"/>
<declare name="x, y, z, mg, min, med" type="Real" array="False" size=""/>
<declare name="scelta, txt, txts" type="String" array="False" size=""/>
<output expression=""inserisci 3 numeri separandoli premendo invio"&ToChar(13)&"e io te li ordinerò in ordine crescente o decrescente"" newline="True"/>
<input variable="x"/>
<input variable="y"/>
<input variable="z"/>
<if expression="x==y&&y==z">
<then>
<assign variable="txt" expression=""I numeri inseriti sono uguali quindi il programma si è quindi arrestato""/>
<output expression="txt" newline="True"/>
</then>
<else>
<if expression="x<z">
<then>
<assign variable="min" expression="x"/>
<assign variable="mg" expression="z"/>
</then>
<else>
<assign variable="min" expression="z"/>
<assign variable="mg" expression="x"/>
</else>
</if>
<if expression="min<y">
<then>
</then>
<else>
<assign variable="min" expression="y"/>
</else>
</if>
<if expression="mg>y">
<then>
</then>
<else>
<assign variable="mg" expression="y"/>
</else>
</if>
<if expression="mg==x&&min==y">
<then>
<assign variable="med" expression="z"/>
</then>
<else>
</else>
</if>
<if expression="mg==x&&min==z">
<then>
<assign variable="med" expression="y"/>
</then>
<else>
</else>
</if>
<if expression="mg==y&&min==x">
<then>
<assign variable="med" expression="z"/>
</then>
<else>
</else>
</if>
<if expression="mg==y&&min==z">
<then>
<assign variable="med" expression="x"/>
</then>
<else>
</else>
</if>
<if expression="mg==z&&min==y">
<then>
<assign variable="med" expression="x"/>
</then>
<else>
</else>
</if>
<if expression="mg==z&&min==x">
<then>
<assign variable="med" expression="y"/>
</then>
<else>
</else>
</if>
<assign variable="txts" expression=""ora scrivi"&ToChar(13)&"crescente (in MAIUSCLO) se vuoi i numeri in ordine crescente"&ToChar(13)&"decrescente (in MAIUSCLO) se vuoi i numeri in ordine decrescente""/>
<output expression="txts" newline="True"/>
<input variable="scelta"/>
<if expression="scelta<>"CRESCENTE"">
<then>
<if expression="scelta=="DECRESCENTE"">
<then>
<assign variable="txt" expression=""I tuoi numeri in ordine decrescente sono: ""/>
<output expression="txt&mg&", "&med&", "&min" newline="True"/>
</then>
<else>
<assign variable="txt" expression=""ERRORE"&ToChar(13)&"Controlla di avere scritto bene l'ordine in cui li volevi e poi riesegui il programma""/>
<output expression="txt" newline="True"/>
</else>
</if>
</then>
<else>
<if expression="scelta=="CRESCENTE"">
<then>
<assign variable="txt" expression=""I tuoi numeri in ordine crescente sono: ""/>
<output expression="txt&min&", "&med&", "&mg" newline="True"/>
</then>
<else>
<assign variable="txt" expression=""ERRORE"&ToChar(13)&"Controlla di avere scritto bene l'ordine in cui li volevi e poi riesegui il programma""/>
<output expression="txt" newline="True"/>
</else>
</if>
</else>
</if>
</else>
</if>
</body>
</function>
</flowgorithm>