Question

a) for i:=8 to 18 do
write(i+3,');
b) for i:=0 to 5 do
write(11+i*2,
4);
Care dintre următoarele secvente de instrucțiuni permit afişarea valorii 137?
Încercuiți varianta corectă şi reprezentați calculele realizare:
a) n:=731; i:=0;
while n>0 do begin
i:=i*10 +n mod 10;
n:=n div 10; end;
write(i);
b) n:=137; i:=0;
while n>0 do begin
write(n mod 10);
n:=n div 100;
end;
2.
Care dintre următoarele secvente de instrucţiuni permite afişarea numărul de cifre &
​

Answer 1

Răspuns:

Nr.1

varianta corecta a

Nr.2

varianta corecta a

i:=0*10+1 = 1

n:=731 : 10=73  (div afiseaza catul impartirii)

while merge pana cand n nu va fi mai mare ca  0 n>0

i:=0*10+3= 3

n:=73 :10 =7

while mege deoarece n=7 si este mai mare ca 0

i:=0*10+7=7

n:=7 : 0= 0

deci rezultatul = 137

programul

var

 n, i: integer;

begin

 n := 731; i := 0;

 while n > 0 do  

 begin

   i := i * 10 + n mod 10;

   n := n div 10;

 end;

 write(i);

end.

Nr.3

varianta corecta b

daca n=235 atunci va afisa 3 deoarece are 3 cifre

Nr.4

a) programul va afisa 3 va lasa 2 spatii si 9 ( 3  9 )

b) pentru a:=5 nu va afisa nimic deoarece 5 ridicat la patrat este 25