Попробуй это код.
a=[]a.append(1)a.append(1)for i in range(2,int(input())):--a.append((a[i-1]+a[i-2]))print(' '.join(list(map(str,a))))
Попробуйте такой вариант:
programm one
var n, i: integer;
S: real;
begin
readln(n);
while(i != n)
begin
s := s + 1/((2*n+1)*(2*n+1));
i = i+1;
end;
writeln(s);
readln();
end.
37 байт,296 бит
Надеюсь правильно!
Элементная база компьютеров первого поколения - это: Электронная лампа
Program a;
var x,a,b,c: real;
begin
write('x,a,b,c = ?');
read(x,a,b,c);
x:=exp((a)*2)+3*exp((b)*2)-18*a*c;
writeln('x=',x);
<span>end.
(Паскаль)</span>