SlideShare a Scribd company logo
Παναγιώτης Παπέττας
 Να σχεδιάζουμε λογικά διαγράμματα με
μια συνθήκη, else.
 Να μετατρέπουμε λογικό διάγραμμα σε
πρόγραμμα.
 Να χρησιμοποιούμε τη προκαταρκτική
εκτέλεση για να ελέγξουμε την ορθότητα
του προγράμματος μας.
20/12/2016 2
20/12/2016 3
 Παράδειγμα 6
 Ένας συμμαθητής σας δυσκολεύεται να βρίσκει τη λύση της
εξίσωσης α’ βαθμού ax+b=0.
 Να σχεδιάσετε το λογικό διάγραμμα για το πιο πάνω
πρόβλημα που θα δέχεται το a και b και θα υπολογίζει το x.
 Σε περίπτωση που δοθεί a=0 να τυπώνει το μήνυμα
«Αδύνατη».
 Τέλος να γράψετε την προκαταρκτική εκτέλεση για την
εξίσωση 2x+4=0.
 (Σημείωση: Η λύση της εξίσωσης είναι x=-b/a). Να γράψετε
την προκαταρκτική εκτέλεση για αρχικές τιμές a=2 και b=4.
20/12/2016 4
20/12/2016 5
Μεταβλητές Απόφαση Παρουσίαση
a b X a=0 T/F
2 4 -4/2=-2 2=0 F -2
20/12/2016 6
 program probl6;
 var a,b,x:real;
 begin
 readln(a,b);
 if (a=0) then
 begin
 writeln('Αδύνατη');
 end
 else
 begin
 x:=-b/a;
 writeln('X=',x:5:0);
 end;
 end.
20/12/2016 7
Αν οι ομάδες εντολών
αποτελούνται μόνο από μια
εντολή, μπορούμε να
παραλείψουμε το begin και
end
Πάνω (πριν) από την
εντολή else δεν βάζουμε ;
Η ομάδα εντολών 2 δεν
είναι υποχρεωτική.
Μπορεί να έχουμε δομή
διακλάδωσης χωρίς else.
 program probl6;
 var a,b,x:real;
 begin
 readln(a,b);
 if (a=0) then
 begin
 writeln(‘Αδύνατη')
 end
 else
 begin
 x:=-b/a;
 writeln('X=',x:5:0)
 end
 end.
20/12/2016 8

More Related Content

PDF
Τεστ στα όρια στο άπειρο 2016
PDF
Synartiseis methodoi 2
PDF
Εργασία στις απόλυτες τιμές
DOC
θεματα προσομοιωσης γγεν - By askisiologio.gr
PDF
ΠΛΗ10 ΤΕΣΤ 25
PDF
Πανελλαδικές εξετάσεις ΕΠΑΛ 2019
PPTX
πως μετατρεπω-δεκαδικα-κλασματα-σε-δεκαδικους-αριθμους
PPTX
The dog
Τεστ στα όρια στο άπειρο 2016
Synartiseis methodoi 2
Εργασία στις απόλυτες τιμές
θεματα προσομοιωσης γγεν - By askisiologio.gr
ΠΛΗ10 ΤΕΣΤ 25
Πανελλαδικές εξετάσεις ΕΠΑΛ 2019
πως μετατρεπω-δεκαδικα-κλασματα-σε-δεκαδικους-αριθμους
The dog

Viewers also liked (18)

PDF
scan cummins
PPTX
Presentacion web2.0 maria mendoza
PDF
Portal content
PDF
Esther MboggoClosing
PPTX
Painel de cotrolo(beatriz, carina, carolina e ines)
PDF
ISS Certificate
PPTX
PDF
Advanced Writing - Session Four
PDF
Guide repères CEP
PPT
Regional Economic Development Jean-Antoine Moreau
PDF
#NSD16 - le suivi des bonnes pratiques tls dans l’écosystème https - Maxence ...
PDF
第2回 タブレット利用動向に関するアンケート調査レポート
PDF
Handbook導入事例集
PPTX
CONCEVOIR ET DIFFUSER UNE CORRESPONDANCE ATTRAYANTE ET PERSONNALISÉE
PDF
#NSD16 - btle juice, un framework d’interception pour le bluetooth low energy...
PDF
la sécurité de l'information (extrait de presentation)
PDF
Identity as a Service - Etude IDaaS
PPT
Essential oils presentation
scan cummins
Presentacion web2.0 maria mendoza
Portal content
Esther MboggoClosing
Painel de cotrolo(beatriz, carina, carolina e ines)
ISS Certificate
Advanced Writing - Session Four
Guide repères CEP
Regional Economic Development Jean-Antoine Moreau
#NSD16 - le suivi des bonnes pratiques tls dans l’écosystème https - Maxence ...
第2回 タブレット利用動向に関するアンケート調査レポート
Handbook導入事例集
CONCEVOIR ET DIFFUSER UNE CORRESPONDANCE ATTRAYANTE ET PERSONNALISÉE
#NSD16 - btle juice, un framework d’interception pour le bluetooth low energy...
la sécurité de l'information (extrait de presentation)
Identity as a Service - Etude IDaaS
Essential oils presentation
Ad

More from papettas (20)

PPTX
C 6 1&2 introduction to data bases
PPTX
C 6 2 basic constructive elements and main objects of a database
PPTX
C3 1 operating systems
PPTX
C2 3 main and secondary memory
PPTX
C6 10 reports
PPTX
C6 6-3 format forms
PPTX
4 2 5 3 basic paragraph format
PPTX
c4 2 5 1-basic paragraph format
PPTX
C6 6 extra operations of tables
PPTX
Electronic class using web 2 tools
PPTX
C2 5 monitors
PPTX
C2 4 printers
PPTX
C2 3 main and secondary memory
PPTX
C2 2 microprocessor-cpu
PPT
C2 1 Basic Concepts of Computer PC Architecture
PPT
Basic consepts of computer architecture
DOCX
Lesson4a
PPTX
A 3 2 Software Kategories
PPTX
A 3 1 Operating System
PPTX
A2 M3 Computer Devises and Periferals
C 6 1&2 introduction to data bases
C 6 2 basic constructive elements and main objects of a database
C3 1 operating systems
C2 3 main and secondary memory
C6 10 reports
C6 6-3 format forms
4 2 5 3 basic paragraph format
c4 2 5 1-basic paragraph format
C6 6 extra operations of tables
Electronic class using web 2 tools
C2 5 monitors
C2 4 printers
C2 3 main and secondary memory
C2 2 microprocessor-cpu
C2 1 Basic Concepts of Computer PC Architecture
Basic consepts of computer architecture
Lesson4a
A 3 2 Software Kategories
A 3 1 Operating System
A2 M3 Computer Devises and Periferals
Ad

C7 17 - code (if then else)

  • 2.  Να σχεδιάζουμε λογικά διαγράμματα με μια συνθήκη, else.  Να μετατρέπουμε λογικό διάγραμμα σε πρόγραμμα.  Να χρησιμοποιούμε τη προκαταρκτική εκτέλεση για να ελέγξουμε την ορθότητα του προγράμματος μας. 20/12/2016 2
  • 4.  Παράδειγμα 6  Ένας συμμαθητής σας δυσκολεύεται να βρίσκει τη λύση της εξίσωσης α’ βαθμού ax+b=0.  Να σχεδιάσετε το λογικό διάγραμμα για το πιο πάνω πρόβλημα που θα δέχεται το a και b και θα υπολογίζει το x.  Σε περίπτωση που δοθεί a=0 να τυπώνει το μήνυμα «Αδύνατη».  Τέλος να γράψετε την προκαταρκτική εκτέλεση για την εξίσωση 2x+4=0.  (Σημείωση: Η λύση της εξίσωσης είναι x=-b/a). Να γράψετε την προκαταρκτική εκτέλεση για αρχικές τιμές a=2 και b=4. 20/12/2016 4
  • 6. Μεταβλητές Απόφαση Παρουσίαση a b X a=0 T/F 2 4 -4/2=-2 2=0 F -2 20/12/2016 6
  • 7.  program probl6;  var a,b,x:real;  begin  readln(a,b);  if (a=0) then  begin  writeln('Αδύνατη');  end  else  begin  x:=-b/a;  writeln('X=',x:5:0);  end;  end. 20/12/2016 7 Αν οι ομάδες εντολών αποτελούνται μόνο από μια εντολή, μπορούμε να παραλείψουμε το begin και end Πάνω (πριν) από την εντολή else δεν βάζουμε ; Η ομάδα εντολών 2 δεν είναι υποχρεωτική. Μπορεί να έχουμε δομή διακλάδωσης χωρίς else.
  • 8.  program probl6;  var a,b,x:real;  begin  readln(a,b);  if (a=0) then  begin  writeln(‘Αδύνατη')  end  else  begin  x:=-b/a;  writeln('X=',x:5:0)  end  end. 20/12/2016 8