Bzdfgdhz
5 год назад
напечатать последовательность из натуральных чисел, образованную дробями в которой числитель следующего члена последовательности получается сложением числителей , а знаменатель - сложением знаменателей двух предыдущих членов. Числитель первых двух членов равны 1, знаменатели равны 1 и 2 (1/1,1/2, 2/3, 3/5,...)пожалуйста можете дать более развернутый ответ, а то я вообще не понимаю паскаль
ОТВЕТЫ
Venedikt
Oct 24, 2020
Var A,B,D,n:integer;
Begin
Write('n = ');ReadLn(n);
A:=1;
B:=1;
For n:= 1 to n do
Begin
D:=A;
A:=A+B;
Swap(A,B);
Write(D,'/',A,' ');
End;
End.
Begin
Write('n = ');ReadLn(n);
A:=1;
B:=1;
For n:= 1 to n do
Begin
D:=A;
A:=A+B;
Swap(A,B);
Write(D,'/',A,' ');
End;
End.
239
Смежные вопросы:
