Κεφάλαιo 11

Primary tabs

You got 6 of 9 possible points.

Your score: 67%

Question

Να χρησιμοποιήσετε την εντολή επανάληψης for , ώστε το
αποτέλεσμα να είναι η εκτύπωση των αριθμών 1 έως και 10.

arithmos:=1;
while arithmos < 11 do
begin
arithmos: =arithmos + 1;
write(arithmos);
end;

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	program erwtisi; var arithmos:integer; begin for arithmos:=0 to 10 do write (arithmos); end.	0
	program erwtisi; var arithmos:integer; begin for arithmos:=1 to 10 do write (arithmos); end.	1

Your answer

Choice

Score

Correct answer

program erwtisi;
var
arithmos:integer;
begin
for arithmos:=0 to 10 do
write (arithmos);
end.

program erwtisi;
var
arithmos:integer;
begin
for arithmos:=1 to 10 do
write (arithmos);
end.

Question

Να τροποποιήσετε τον κώδικα ώστε, να δίνει τα ίδια αποτελέσματα με τη
χρήση των εντολών repeat until

athroisma: =0;
metritis :=0;
while metritis < 10 do
begin
athroisma:=athroisma + metritis;
writeln(metritis:10,athroisma:10);
metritis:= metritis + 1;
end;

Score: 0 of 1

Your answer	Choice	Score	Correct answer
	program erwtisi_11_10_1; var athroisma,metritis:integer; begin athroisma:=0; metritis:=0; repeat athroisma:=athroisma+metritis; writeln(metritis:10, athroisma:10); metritis:=metritis+1; until metritis > 10; end.	0
	program erwtisi_11_10_1; var athroisma,metritis:integer; begin athroisma:=0; metritis:=0; repeat athroisma:=athroisma+metritis; writeln(metritis:10, athroisma:10); metritis:=metritis+1; until metritis > 9; end.	0

Your answer

Choice

Score

Correct answer

program erwtisi_11_10_1;
var
athroisma,metritis:integer;
begin
athroisma:=0;
metritis:=0;
repeat
   athroisma:=athroisma+metritis;
   writeln(metritis:10, athroisma:10);
   metritis:=metritis+1;
until metritis > 10;
end.

Question

tΝα αλλάξετε τη σειρά των εντολών του παρακάτω αλγορίθμου ώστε το
αποτέλεσμα να είναι η εκτύπωση των αριθμών 1 έως και 10.

arithmos:=1;
while arithmos < 11 do
begin
arithmos: =arithmos + 1;
write(arithmos:5);
end;

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	arithmos:=1; while arithmos <10 do begin write(arithmos:5); arithmos:=arithmos + 1; end;	0
	arithmos:=1; while arithmos < 11 do begin write(arithmos:5); arithmos:=arithmos + 1; end;	1

Your answer

Choice

Score

Correct answer

arithmos:=1;
while arithmos <10 do
begin
write(arithmos:5);
arithmos:=arithmos + 1;
end;

arithmos:=1;
while arithmos < 11 do
begin
write(arithmos:5);
arithmos:=arithmos + 1;
end;

Question

Να δώσετε τη μορφή της εντολής επανάληψης for, να εξηγήσετε τη λειτουργία της

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	for λογική συνθήκη do begin Εντολή1; Εντολή2; Εντολή3; end; Η εντολή for χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων. Ο έλεγχος για την επανάληψη γίνεται στην αρχή του κύκλου των εντολών που επαναλαμβάνονται. Το χαρακτηριστικό της επανάληψης for είναι ότι η εντολή / ες που περιέ- χονται, εκτελούνται τουλάχιστον μια φορά.	0
	for μεταβλητή:=αρχική_τιμή to τελική_τιμή do Εντολή; Η εντολή που ακολουθεί το do μπορεί να είναι απλή ή σύνθετη Σύνθετη εντολή είναι η εντολή που περιλαμβάνεται ανάμεσα στις λέξεις begin-end (δείτε σελ. 94) και εκτελείται μέχρις ότου η μεταβλητή ελέγχου αποκτήσει τιμή ίση με την τελική τιμή. Αν η αρχική τιμή είναι μεγαλύτερη από την τελική, οι εντολές που ακολουθούν το do δεν εκτελούνται. Η εντολή for είναι η εντολή προκαθορισμένης επανάληψης διότι ο αριθμός των επανα- λήψεων είναι εκ των προτέρων γνωστός. Αν η μεταβλητή ελέγχου αρχίζει από τη μεγαλύτερη τιμή μέχρι τη μικρότερη, τότε η μορφή της εντολής είναι η παρακάτω: for μεταβλητή:=αρχική_τιμή downto τελική_τιμή do Εντολή;	1

Your answer

Choice

Score

Correct answer

for λογική συνθήκη do

begin
Εντολή1;

Εντολή2;

Εντολή3;

end;

Η εντολή for χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων. Ο
έλεγχος για την επανάληψη γίνεται στην αρχή του κύκλου των εντολών που επαναλαμβάνονται.

Το χαρακτηριστικό της επανάληψης for είναι ότι η εντολή / ες που περιέ-
χονται, εκτελούνται τουλάχιστον μια φορά.

for μεταβλητή:=αρχική_τιμή to τελική_τιμή do
Εντολή;
Η εντολή που ακολουθεί το do μπορεί να είναι απλή ή σύνθετη

Σύνθετη εντολή είναι η εντολή που περιλαμβάνεται ανάμεσα στις λέξεις begin-end (δείτε σελ. 94)
και εκτελείται μέχρις ότου η μεταβλητή ελέγχου αποκτήσει τιμή ίση με την τελική τιμή. Αν η αρχική τιμή είναι
μεγαλύτερη από την τελική, οι εντολές που ακολουθούν το do δεν εκτελούνται. Η
εντολή for είναι η εντολή προκαθορισμένης επανάληψης διότι ο αριθμός των επανα-
λήψεων είναι εκ των προτέρων γνωστός.
Αν η μεταβλητή ελέγχου αρχίζει από τη μεγαλύτερη τιμή μέχρι τη μικρότερη, τότε η
μορφή της εντολής είναι η παρακάτω:
for μεταβλητή:=αρχική_τιμή downto τελική_τιμή do
Εντολή;

Question

Να δώσετε τη μορφή της εντολής επανάληψης while, να εξηγήσετε τη λειτουργία της

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	while λογική έκφραση do εντολή Κάθε φορά, ακόμα και την πρώτη, πριν εκτελεστεί η εντολή που αποτελεί το σώμα της επανάληψης (αυτή που βρίσκεται μετά το do) ελέγχεται η λογική έκφραση η οποία ακολουθεί το while. Στην περίπτωση που η λογική έκφραση δίνει αποτέλεσμα true, η εντολή μετά το do εκτελείται ενώ στην περίπτωση που η λογική έκφραση δίνει ως απο- τέλεσμα false η εντολή μετά το do δεν εκτελείται και ο έλεγχος περνά στην επόμενη εντολή του προγράμματος. Στην περίπτωση που μετά το do αντί για μία, έχουμε ομάδα εντολών, αυτές τοποθετούνται μεταξύ των λέξεων begin ? end. Η εντολή while χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων.	1
	while i:=αρχική τιμή to τελική τιμή do Η εντολή που ακολουθεί το do μπορεί να είναι απλή ή σύνθετη Σύνθετη εντολή είναι η εντολή που περιλαμβάνεται ανάμεσα στις λέξεις begin-end (δείτε σελ. 94) και εκτελείται μέχρις ότου η μεταβλητή ελέγχου αποκτήσει τιμή ίση με την τελική τιμή. Αν η αρχική τιμή είναι μεγαλύτερη από την τελική, οι εντολές που ακολουθούν το do δεν εκτελούνται.	0

Your answer

Choice

Score

Correct answer

while λογική έκφραση do εντολή

Κάθε φορά, ακόμα και την πρώτη, πριν εκτελεστεί η εντολή που αποτελεί το σώμα της
επανάληψης (αυτή που βρίσκεται μετά το do) ελέγχεται η λογική έκφραση η οποία
ακολουθεί το while. Στην περίπτωση που η λογική έκφραση δίνει αποτέλεσμα true, η
εντολή μετά το do εκτελείται ενώ στην περίπτωση που η λογική έκφραση δίνει ως απο-
τέλεσμα false η εντολή μετά το do δεν εκτελείται και ο έλεγχος περνά στην επόμενη
εντολή του προγράμματος. Στην περίπτωση που μετά το do αντί για μία, έχουμε ομάδα
εντολών, αυτές τοποθετούνται μεταξύ των λέξεων begin ? end.

Η εντολή while χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων.

while i:=αρχική τιμή to τελική τιμή do

Η εντολή που ακολουθεί το do μπορεί να είναι απλή ή σύνθετη Σύνθετη εντολή είναι η εντολή που περιλαμβάνεται ανάμεσα στις λέξεις begin-end (δείτε σελ. 94)
και εκτελείται μέχρις ότου η μεταβλητή ελέγχου αποκτήσει τιμή ίση με την τελική τιμή. Αν η αρχική τιμή είναι
μεγαλύτερη από την τελική, οι εντολές που ακολουθούν το do δεν εκτελούνται.

Question

Να δώσετε τα αποτελέσματα από την εκτέλεση των παρακάτω εντολών

arithmos:=1;
while arithmos < 11 do
   begin
      arithmos: =arithmos + 1;
      write(arithmos:5);
   end;

Score: 0 of 1

Your answer	Choice	Score	Correct answer
	Το αποτέλεσμα θα είναι να τυπωθούν οι αριθμοί από 2 μέχρι και 11	0
	Το αποτέλεσμα θα είναι να τυπωθούν οι αριθμοί από 1 μέχρι και 10	0

Question

Να δώσετε τη μορφή της εντολής επανάληψης repeat until, να εξηγήσετε τη λειτουργία της

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	until (λογική έκφραση); εντολή_1; εντολή_2; ??.. εντολή_ν; repeat Κάθε φορά, ακόμα και την πρώτη, πριν εκτελεστεί η εντολή που αποτελεί το σώμα της επανάληψης (αυτή που βρίσκεται μετά το do) ελέγχεται η λογική έκφραση η οποία ακολουθεί το until. Στην περίπτωση που η λογική έκφραση δίνει αποτέλεσμα true, η εντολή μετά το do εκτελείται ενώ στην περίπτωση που η λογική έκφραση δίνει ως απο- τέλεσμα false η εντολή μετά το do δεν εκτελείται και ο έλεγχος περνά στην επόμενη εντολή του προγράμματος.	0
	repeat εντολή_1; εντολή_2; ??.. εντολή_ν; until (λογική έκφραση); Η εντολή repeat χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων. Ο έλεγχος για την επανάληψη γίνεται στο τέλος του κύκλου των εντολών που επαναλαμ- βάνονται. Το χαρακτηριστικό της επανάληψης repeat είναι ότι η εντολή / ες που περιέ- χονται, εκτελούνται τουλάχιστον μια φορά.	1

Your answer

Choice

Score

Correct answer

until (λογική έκφραση);
εντολή_1;
εντολή_2;
??..
εντολή_ν;

repeat

Κάθε φορά, ακόμα και την πρώτη, πριν εκτελεστεί η εντολή που αποτελεί το σώμα της
επανάληψης (αυτή που βρίσκεται μετά το do) ελέγχεται η λογική έκφραση η οποία
ακολουθεί το until. Στην περίπτωση που η λογική έκφραση δίνει αποτέλεσμα true, η
εντολή μετά το do εκτελείται ενώ στην περίπτωση που η λογική έκφραση δίνει ως απο-
τέλεσμα false η εντολή μετά το do δεν εκτελείται και ο έλεγχος περνά στην επόμενη
εντολή του προγράμματος.

repeat
εντολή_1;
εντολή_2;
??..
εντολή_ν;
until (λογική έκφραση);

Η εντολή repeat χρησιμοποιείται για μη προκαθορισμένο αριθμό επαναλήψεων. Ο
έλεγχος για την επανάληψη γίνεται στο τέλος του κύκλου των εντολών που επαναλαμ-
βάνονται. Το χαρακτηριστικό της επανάληψης repeat είναι ότι η εντολή / ες που περιέ-
χονται, εκτελούνται τουλάχιστον μια φορά.

Question

Πόσες επαναλήψεις θα έχουμε από την εκτέλεση των παρακάτω εντολών

arithmos:=1;

telos:= false;
while not (telos) do
begin
arithmos:=arithmos + 2 ;
if arithmos > 100 then
telos :=true;
end;

Score: 1 of 1

Your answer	Choice	Score	Correct answer
	100	0
	50	1
	51	0

Question

Να χρησιμοποιήσετε τις εντολές επανάληψης repeat until , ώστε το
αποτέλεσμα να είναι η εκτύπωση των αριθμών 1 έως και 10.

arithmos:=1;
while arithmos < 11 do
begin
arithmos: =arithmos + 1;
write(arithmos:5);
end;

Score: 0 of 1

Your answer	Choice	Score	Correct answer
	program erwtisi; var arithmos:integer; begin arithmos:=0; repeat arithmos:=arithmos+1; write (arithmos:5); until arithmos>10 end.	0
	program erwtisi; var arithmos:integer; begin arithmos:=1; repeat write (arithmos:5); arithmos:=arithmos+1; until arithmos>10 end.	0

Your answer

Choice

Score

Correct answer

program erwtisi;
var
arithmos:integer;
begin
arithmos:=0;
repeat
arithmos:=arithmos+1;

write (arithmos:5);
until arithmos>10
end.

program erwtisi;
var
arithmos:integer;
begin
arithmos:=1;
repeat
write (arithmos:5);
arithmos:=arithmos+1;
until arithmos>10
end.

You are here

Κεφάλαιo 11

Primary tabs