program d1;
var x,v,b,n,d,q:integer
begin
x:=A*A;
v:=x*x*A;
b:=v*v*v*x;
writeln(x);
writeln(v);
writeln(b);
end.
101010102-2528+716=101008290
=(C1-A1)*2
--------------------------------------------
Всего цветов N=2. По формуле N=2^i узнаём, что вес одного символа, в данном случае значение цвета для одного пикселя равно 1. Количество пикселей обозначается буквой K и равно 52*14. По формуле I=K*i узнаём
I=52*14*1=728 бит
===== PascalABC.NET =====
begin
var n := ReadInteger('Сколько точек будете вводить?');
for var i := 1 to n do
begin
var x := ReadReal;
Writeln(x:10:5, Sin(Sqr(x) + 1.67 * Pi):20:15)
end
end.
Чтобы получить вид таблицы, после ввода числа точек нужно в следующей строке вводить весь набор х сразу и через пробел