Ребят почистил ПК потом включил и выдает биус а он у меня китайский и я чё то там нажал и теперь нету - id2004437820221118 от 20bam05buk 18.11.2022 20:58

Question

Информатика: Ребят почистил ПК потом включил и выдает биус а он у меня китайский и я чё то там нажал и теперь нету изображения.Я уже батарейку вытаскивал на 30 мин контакты чистое ​

20bam05buk · Accepted Answer

{общий член последовательности можно задать формулой Sn=((An-1)+(Bn-1))/(An-1) где A- числитель, В - знаменатель }

const n=10;
var A,B,C,i,k: integer;
begin
A:=1; B:=1;
{ вывод последовательности на экран }
for i:=2 to n do
begin
C:=A; A:=A+B; B:=C;
writeln(i,' -> ',A,'/',B);
   end;
{ подсчет k - го члена }
   k:=20; A:=1; B:=1;
   for i:=2 to k do
begin
      C:=A; A:=A+B; B:=C;
end;
  writeln(k,' - ый элемент = ',A,'/',B);
end.

MOGZ ответил