Дано целое число N (>0). Последовательность вещественных чисел Ak определяются следующим образом: A0=2, Ak=2+1/Ak-1, K=1,2,. . Вывести элементы A1,A

@ALEXandr20333 · Регистрация: 30.01.2014

Пожайлуйста помогите надо решить задачу за выходные!!!
Дано целое число N (>0). Последовательность вещественных чисел Ak определяются следующим образом: A0=2, Ak=2+1/Ak-1, K=1,2,... . Вывести элементы A1,A2, ..., An.
или неределать код с паскаля на делфи

Pascal

uses crt;
var
n,i:integer; 
ak:real;
begin
clrscr;
write('Введите N: ');
readln(n);
ak:=2;
for i:=1 to n do
begin
ak:=2+1/(ak-1);
writeln('a',i,'=',ak:2:4);
end;
repeat until keypressed;
end.

@Xo6ut · 30.01.2014, 19:26

uses crt; удалите и будет вам код на делфи

@Lumpex · 27.04.2019, 09:14

А как этот код в HTML переделать?

@D1973 · 27.04.2019, 10:18

Lumpex, а ничего, что это раздел Delphi? При чем тут HTML?

@droider · 27.04.2019, 21:45

Сообщение от Lumpex

код в HTML переделать

с каких пор HTML стал языком программирования?

@Xo6ut 103 / 90 / 75 Регистрация: 04.11.2011 Сообщений: 1,818
	30.01.2014, 19:26	2
	uses crt; удалите и будет вам код на делфи 0

@Lumpex 0 / 0 / 0 Регистрация: 05.03.2019 Сообщений: 2
	27.04.2019, 09:14	3
	А как этот код в HTML переделать? 0

@D1973 Модератор 8331 / 5544 / 2263 Регистрация: 21.01.2014 Сообщений: 23,810 Записей в блоге: 3
	27.04.2019, 10:18	4
	Lumpex, а ничего, что это раздел Delphi? При чем тут HTML? 0

@droider 4882 / 2755 / 848 Регистрация: 04.10.2012 Сообщений: 10,047
	27.04.2019, 21:45	5
	Сообщение от Lumpex код в HTML переделать с каких пор HTML стал языком программирования? Миниатюры 0

Опции темы