Максим Виноградов

Правовое регулирование оборота компьютерных программ.

ПРИЛОЖЕНИЕ 1.

Исходный текст программы на языке C++ выглядит так:

float Distance(Point p0,Point p1)
{
    float xdist, ydist;
    xdist = p1.x - p0.x;
    ydist = p1.y - p0.y;
    return sqrt (xdist * xdist + ydist * ydist);
}


Исходный текст программы на языке Basic выглядит так:

Function Distance(p0 As Point, p1 As Point) As Single
    Dim xdist As Single, ydist As Single
    Let xdist = p1.x - p0.x
    Let ydist = p1.y - p0.y
    Let Distance = sqrt(xdist * xdist + ydist * ydist)
End Function

Исходный текст программы на языке Pascal выглядит так:

Function Distance(p0,p1:Point):Real;
    Var xdist,ydist:Real;
Begin
    xdist:=p1.x-p0.x;
    ydist:=p1.y-p0.y;
    Distance:=sqrt(xdist*xdist+ydist*ydist);
End;

Эта же программа в том виде, в котором она понятна компьютеру с процессором Intel Pentium имеет вид:


55 8B EC 83 EC 4C 53 56 57 8D 7D B4 B9 13 00 00 00 B8 
CC CC CC CC F3 AB D9 45 10 D8 65 08 D9 5D FC D9 45 14 
D8 65 0C D9 5D F8 D9 45 FC D8 4D FC D9 45 F8 D8 4D F8 
DE C1 83 EC 08 DD 1C 24 E8 A1 00 00 00 83 C4 08 D9 55 F4



Предыдущий раздел | Оглавление | Следующий раздел