ΕΡΓΑΣΙΑ : ΥπολογισμÏŒς Φορολογίας              

ΨΕΥΔΟΓΛΩΣΣΑ

Υπολογισμος  Φορολογίας

Εμφάνισε ‘ ΔÏŽστε επÏŽνυμο καί ÏŒνομα ‘

Εμφάνισε  ‘ ΔÏŽστε Α.Φ.Μ.‘

Εμφάνισε  ‘ ΔÏŽστε Ετήσια  Îˆσοδα’

Διαβασε     C , ( D = Σταθερή )

Διάβασε     C > D = Α

Διάβασε     C < D = Β

Διάβασε      ΕÎ¬ν  Α > Β , τοτε,

Εμφάνισε    ‘ Φορολογησαι’

Τελος

ΔΙΑΓΡΑΜΜΑ ΡΟΗΣ

Υπολογισμος  Φορολογιας

                                                         (_ΑΡΧΗ )

                                  / Εμφάνισε ‘ ΕπÏŽνυμο , Ονομα ‘/

                                           / Εμφάνισε ‘Α.Φ.Μ.’/

                               / Εμφάνισε ‘ΔÏŽστε Ετήσια Έσοδα’ , C / 

                                                  /  Διάβασε C  /

                                                  /  Διάβασε D  /

                                           |  Γραψε  C > D = A   | 

                                           |  Γραψε  C < D = B   |

                                         |  Γραψε  if  A < C  then |   

                                        / Εμφάνισε ‘Φορολογείσαι’ / 

                                                       ( ΤΕΛΟΣ )

ΨΕΥΔΟΓΛΩΣΣΑ    ΥπολογισμÏŒς  Φορολογίας με αριθμητική έξοδο

Εμφάνισε ‘ ΔÏŽστε επÏŽνυμο καί ÏŒνομα ‘

Εμφάνισε  ‘ ΔÏŽστε Α.Φ.Μ.‘

Εμφάνισε  ‘ ΔÏŽστε Ετήσια  Îˆσοδα’

Διαβασε     C , ( D = Σταθερή )

Διάβασε     C > D = Α

Διάβασε     C < D = Β

Διάβασε      ΕÎ¬ν  Α > Β , τοτε

                      Διάβασε ( C x 10 ) / 100 = F

Εμφάνισε    ‘ Φορολογησαι με, F ’

Τελος

ΔΙΑΓΡΑΜΜΑ ΡΟΗΣ      Υπολογισμος  Φορολογιας με αριθμητικη εξοδο

                                                         (_ΑΡΧΗ )

                                  / Εμφάνισε ‘ ΕπÏŽνυμο , Ονομα ‘/

                                           / Εμφάνισε ‘Α.Φ.Μ.’/

                               / Εμφάνισε ‘ΔÏŽστε Ετήσια Έσοδα’ , C / 

                                                  /  Διάβασε C  /

                                                  /  Διάβασε D  /

                                           |  Γραψε  C > D = A   | 

                                           |  Γραψε  C < D = B   |

                                         |  Γραψε  IF  A < C  THEN |   

                                                                                     (ΑΡΧΗ)

                                        /  Διάβασε C x 10 / 100 = F  /

                                    / Εμφάνισε ‘Φορολογείσαι με ,F’ / 

                                                                                      ( ΤΕΛΟΣ _  IF )

                                                               ( ΤΕΛΟΣ )

                                                                                                                        Γιωργος Γερασιμιδης    1Ν-ΕΠΠ01 (15)