Informatică, întrebare adresată de Papca, 8 ani în urmă

Vā rog ajutațimă să rezolv testul, măcar câteva exerciții.

Anexe:

Răspunsuri la întrebare

Răspuns de howardax
0

1)

Pentru m=1, n=5 apelurile se vor executa de 5 ori.

Pentru m=3, n=5 apelurile se vor executa de 3 ori.

Pentru m=3, n=3 apelurile se vor executa odată.

Pentru m=5, n=3 apeluri se vor execcuta 0 ori.

2)

program brainly;

var n:integer;

c:char;

begin

for c:='A' to 'Z' do begin

       n:=ord(c);

       writeln(c,'->',n);

 end;

end.

3)

program brainly;

var n,i,sum,prod:integer;

begin

writeln('Dati n: ');

read(n);

sum:=0;

for i:=1 to n do begin

sum:=sum+(2*i);

if i=n then begin

Write(2*i, '=');

end

else

Write(2*i, '+');

end;

Write(sum);

writeln();

sum:=0;

for i:=1 to n do begin

sum:=sum+(2*i+i);

if i=n then begin

Write(2*i+i, '=');

end

else

Write(2*i+i, '+');

end;

Write(sum);

writeln();

prod:=1;

for i:=1 to n do begin

prod:=prod*(2*i);

if i=n then begin

Write(2*i, '=');

end

else

Write(2*i, '*');

end;

Write(prod);

writeln();

prod:=1;

for i:=1 to n do begin

prod:=prod*(2*i+i);

if i=n then begin

Write(2*i+i, '=');

end

else

Write(2*i+i, '*');

end;

Write(prod);

end.

Alte întrebări interesante