javascript:var Ф = н => n => (n == 1 ? н : 2 * F(n - 1) + 5 * n), F = Ф(5), G = Ф(4); alert(F(4) + F(5));
415.
Var
s: real;
a: integer;
begin
readln(a);
s := 4*sqrt(a);
writeln(s);
end.
Исходная программа была совершенно безумной, пришлось поправить.
program lab3;
label
loop,fin;
var
x,y:real;
begin
writeln('vvedite x'); readln(x);
loop:
if x>1 then goto fin;
if 1.5*x<1 then y:=1.5*x-ln(1.5*x)/ln(10)
else
if 1.5*x>1 then y:=1.5*x+ln(1.5*x)/ln(10)
else y:=1;
writeln('x=',x:0:1,', y=',y:5:3);
x:=x+0.1;
goto loop;
fin:
end.
Блок-схема - в прилагаемом файле.
Программа:
var n,i:integer; p:real;
begin
write('n = '); readln(n);
p:=1;
for i:=1 to n do p:=p*i;
writeln('p = ',p);
end.
Пример:
n = 10
p = 3628800