Паскаль. лабораторную доделать. неуспеваю. код рабочий, надо описать значения переменных и по возможности описать сам алгоритм. описание переменных• a, b – • midx, midy - • sum -• g -• t - • x, y – • m – • i – • n - • s - описание алгоритма1. код программыuses crt, graphabc; var a, b: real; midx, midy: integer; g: integer; t: real; x, y: real; m: real; i: integer; n: integer; s: string; beginhidecursor; writeln('введите a'); readln(a); writeln('введите b'); readln(b); clearwindow; setwindowtitle ('кривая'); setwindowsize(500, 500); midx : = windowwidth div 2; midy : = windowheight div 2; if b> a then begin m: =(midx-30)/(2*b); n: =trunc(2*b)+1; endelse begin m: =(midx-30)/(2*a); n: =trunc(2*a)+1; end; for i: =1 to n do begin str(i, s); textout(midx+round(i*m)+5, midy+10, s); textout(midx-round(i*m)+5, midy+10, '-'+s); textout(midx-20, midy+round(i*m), s); textout(midx-20, midy-round(i*m), '-'+s); line(midx+round(i*m), 0, midx+round(i*m), 2*midy); line(midx-round(i*m), 0, midx-round(i*m), 2*midy); line(0, midy+round(i*m), 2*midx, midy+round(i*m)); line(0, midy-round(i*m), 2*midx, midy-round(i*m)); end; textout(midx+4, midy+10, '0'); setpenwidth(3); line(0, midy, windowwidth, midy); line(midx, 0, midx, windowheight); setpencolor(clred); for g : = 0 to 360 do begin t : = g * pi / 180; x : = midx + m*b * sqr(cos(t)) + m*a * cos(t); y : = midy + m*b * cos(t) * sin(t) + m*a * sin(t); if g = 0 then moveto(round(x), round(y)) else lineto(round(x), round(y)); end; end.

36 строк

Объяснение:

I = K * i

I - информационный объём текста рассказа (размер файла, содержащего рассказ)

K - количество символов в рассказе

i - информационный вес одного символа (число бит, используемых для записи одного символа)

K = k1 * k2 * k3

K - количество символов в рассказе

k1 - количество страниц в рассказе

k2 - количество строк на странице

k3 - количество символов в строке

Дано:

I = 45 Кбайт = 46 080 байт

k1 = 20 страниц

k3 = 32 символа

i = 16 бит = 2 байт

Найти:

k2

I = k1 * k2 * k3 * i

k2 = I / (k1 * k3 * i)

k2 = 46 080 / (20 * 32 * 2) = 46 080 / 1 280 = 36 строк

8 бит = 1 байт

1 024 байт = 1 Кбайт

Кривы́е Безье́ — типы кривых, предложенные в 60-х годах XX века независимо друг от друга Пьером Безье из автомобилестроительной компании «Рено» и Полем де Кастельжо из компании «Ситроен», где применялись для проектирования кузовов автомобилей.

Несмотря на то, что открытие де Кастельжо было сделано несколько ранее Безье (1959), его исследования не публиковались и скрывались компанией как производственная тайна до конца 1960-х.

Кривая Безье является частным случаем многочленов Бернштейна, описанных русским математиком Сергеем Натановичем Бернштейном в 1912 году.

Впервые кривые были представлены широкой публике в 1962 году французским инженером Пьером Безье, который, разработав их независимо от де Кастельжо, использовал их для компьютерного проектирования автомобильных кузовов. Кривые были названы именем Безье, а именем де Кастельжо назван разработанный им рекурсивный определения кривых (алгоритм де Кастельжо).

Впоследствии это открытие стало одним из важнейших инструментов систем автоматизированного проектирования и программ компьютерной графики.

Кривая Безье относится к частному классу алгебраических кривых, а именно: к кривым 3-го и 2-го порядков соответственно.