1)3 * (умножить) 30 = 90 - строк всего 2)90 * 50 = 4500 - символов всего 3) 2250 * 8 = 18000 - бит весь текст 4)18000 : 4500 = 4 - вес одного символа 5) 2^4 ( два в четвёртой степени) = 16 - символов в алфавите Ответ: 16.
Ну этот кусок может выглядеть так:
---------------
t:= A;
A:=B;
B:=C;
C:=t;
---------------
Рисунок 2:
program ggg;uses GraphABC;var xc,yc,y,x,r: integer;beginwriteln('введи центр окружности');readln(xc,yc);writeln('введи радиус окоружности');readln(r);x:= xc;y:= yc;Brush.Color:= clRandom;circle(x,y,r);circle(x-r,y-r div 4,r div 4);circle(x+r,y-r div 4,r div 4);circle(x,y-r,r div 2);
end.
Лови)
var
x: real;
begin
x := 1;
while x <= 5 do
begin
writeln('y(', x:1:1, ') = ', ln(x) - exp(-1 * x));
x := x + 0.1;
end;
end.