65536 это 2 в 16 => 16 бит
640*16*288 =2949120 бит =2880 Байт
Ответ 2880 Байт
uses crt;
var
a:array [1..9] of integer;
i,c,m,n:integer;
b:real;
begin
clrscr;
randomize();
c:=1;
for i:=1 to 9 do
begin
if i=c then
begin
a[i]:=i+3;
c:=c+3;
end
else
begin
if i mod 3=0 then a[i]:=a[i-1]+a[i-2] else a[i]:=sqr(i-1);
end;
write(a[i],' ');
end;
readln();
end.
<span>график зависимости пройденного пути от времени, если известно, что тело падало в идеальной среде, начальная скорость равна 0, падение происходит на планете Земля.
Это равноускоренное движение s = g*t^2/2</span>
Технология и служба по пересылке и получению электронных сообщений (называемых «письма», «электронные письма» или «сообщения») между пользователями компьютерной сети
Вот три первых вычисления
===== PascalABC.NET =====
begin
var x := ReadReal;
var y := x - Sqr(x) / 3 + x ** 6 / 4;
Println(y);
y := 3 ** (-x) + Cos(x) - Sin(x * x);
Println(y);
y := (x ** 3 + 9 * x + 12) / (x * x - 6 * x + 15);
Println(y);
end.