-
Notifications
You must be signed in to change notification settings - Fork 10
Expand file tree
/
Copy path02_AreaTriangulo.fprg
More file actions
32 lines (32 loc) · 1.5 KB
/
02_AreaTriangulo.fprg
File metadata and controls
32 lines (32 loc) · 1.5 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
<?xml version="1.0"?>
<flowgorithm fileversion="2.11">
<attributes>
<attribute name="name" value=""/>
<attribute name="authors" value="Luis Monge"/>
<attribute name="about" value=""/>
<attribute name="saved" value="2019-09-07 10:20:52 PM"/>
<attribute name="created" value="THVpcyBNb25nZTtNSU5HOzIwMTktMDktMDc7MTA6MDY6MzcgUE07MjUzNQ=="/>
<attribute name="edited" value="THVpcyBNb25nZTtNSU5HOzIwMTktMDktMDc7MTA6MjA6NTIgUE07MzsyNjM4"/>
</attributes>
<function name="Main" type="None" variable="">
<parameters/>
<body>
<declare name="b, h" type="Integer" array="False" size=""/>
<declare name="resultado" type="Real" array="False" size=""/>
<output expression=""¿Cual es la base?"" newline="True"/>
<input variable="b"/>
<output expression=""¿Cual es la altura?"" newline="True"/>
<input variable="h"/>
<assign variable="resultado" expression="(b*h)/2"/>
<output expression="resultado" newline="True"/>
<if expression="resultado==20">
<then>
<output expression=""El área del triangulo es muy pequeña"" newline="True"/>
</then>
<else>
<output expression=""El área del triangulo es muy grande"" newline="True"/>
</else>
</if>
</body>
</function>
</flowgorithm>