program poslidovnist;
var i,n,b,c,d: integer;
begin
writeln ('vvedit kilkist chisel');
readln (n);
b:=2;
c:=9;
for i:=1 to n do
begin
d:=b+c;
writeln (d:2,' ');
b:=b*2;
c:=c*3;
end;
readln
end.
Головна | Реєстрація | Вхід | RSS | Четвер, 11.21.2024, 9:46 PM |
Довідник для учнів та студентів | |
Вітаю Вас Гость |
|
Послідовність значення bi=2i+3i+1 |
|
Guide-for-students © 2024 |
Створити безкоштовний сайт на uCoz |