Question

rescrie.secventele.date.utilizind.instructiunea.repeat

Answer 1

4

s:=0;
repeat 
readln(a);
s:=s+a;
until s>=100;

5

s:=0; realdn(a);
repeat
s:=s+a;
readln(a);
until a<0;