👤

Ajutati-ma va rog sa-mi fac problema nr 22...
dau coroana


Ajutatima Va Rog Sami Fac Problema Nr 22 Dau Coroana class=

Răspuns :

var n:integer;procedure t22(i:integer);beginif i<=n then         begin         write(3*i-1,' ');         t22(i+1);         end;end;
BEGINwrite('n='); readln(n);t22(1);readln;end.
var n:integer;procedure
t22(i:integer);beginif i<=n then
begin. write(3*i-1,' ');
t22(i+1); end;end;
BEGINwrite('n=');
readIn(n);t22(1);readIn;end.