Символысимволысимволы
В третьей через архиватор быстрее.
N=16
N=2^i
Отсюда следует, что i=4бит
i=4
k=1000
I=k*I
I=1000*4=4000бит
4000/8=500байт
Program pr;
uses crt;
Var a, b, c, y:real;
Begin
Writeln('Введите a, b, c');
readln(a, b, c);
y:=exp(3*ln(b))+sqrt(c)-sqrt(a);
Writeln('y=', y);
readln;
end.
Program Posledow;
Var x, y: real;
Begin
x:=8;
Repeat y:=SQR(x-8)/6;
Writeln (x,' ',y);
x:=x+6;
Until y+5<0;
End.