-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path1 - 40 Arası 3'e Bölünen Sayılar ve Adedi.fprg
30 lines (30 loc) · 1.54 KB
/
1 - 40 Arası 3'e Bölünen Sayılar ve Adedi.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
<?xml version="1.0"?>
<flowgorithm fileversion="2.11">
<attributes>
<attribute name="name" value=""/>
<attribute name="authors" value="LENOVO"/>
<attribute name="about" value=""/>
<attribute name="saved" value="2022-01-25 11:36:38 ÖÖ"/>
<attribute name="created" value="TEVOT1ZPO0RFU0tUT1AtU0RQVFBRODsyMDIyLTAxLTI1OzExOjI5OjM0IMOWw5Y7MzEzMQ=="/>
<attribute name="edited" value="TEVOT1ZPO0RFU0tUT1AtU0RQVFBRODsyMDIyLTAxLTI1OzExOjM2OjM4IMOWw5Y7MzszMjQz"/>
</attributes>
<function name="Main" type="None" variable="">
<parameters/>
<body>
<declare name="i, adet" type="Integer" array="False" size=""/>
<output expression=""1 - 40 Arası 3'e Bölünen Sayıları Ekrana Yazdıran Program!"" newline="True"/>
<assign variable="adet" expression="0"/>
<output expression=""Sayınız 3'e Tam Bölünüyor = "" newline="True"/>
<for variable="i" start="1" end="40" direction="inc" step="1">
<if expression="i % 3 == 0">
<then>
<output expression="i" newline="True"/>
<assign variable="adet" expression="adet + 1"/>
</then>
<else/>
</if>
</for>
<output expression=""3'e Tam Bölünen Sayıların Adeti = " & adet" newline="True"/>
</body>
</function>
</flowgorithm>