Доделайте программу. у меня есть меню и мне надо вставить туда программу в пункт «нарисовать астроиду", и в пункт "справка" написать текст код меню: uses graphabc; const x0 = 150; y0 = 200; w = 100; step = 120; n = 3; kv1=0; kv2=1; kv3=2; var f: integer; q: array[1..3] of string= ('нарисовать астроиду','справка','выход'); procedure menu(f: integer); var i: integer; begin for i: =1 to 3 do begin setfontsize(10); if f=i then setfontcolor(clred) else setfontcolor(clgreen); textout(200,100+i*30,q[i]); end; end; procedure choose; begin case f of 1: begin; textout (1,1,'да'); end; 3: halt; end; end; procedure up; begin if f=1 then f: =3 else f: =f-1; clearwindow; menu(f); end; procedure down ; begin if f=3 then f: =1 else f: =f+1; clearwindow; menu(f); end; procedure keydown(key: integer); begin case key of vk_up: up; vk_down: down; vk_enter: begin; choose; end; end; end; begin f: =1; menu(f); onkeydown : = keydown; end. код программы: uses graphabc; var r, xc, yc, x1, y1: integer; x, y, t: real; s: string; begin repeat write('vvedite radius [50..200] r='); readln(r); until r in [50..200]; setwindowsize(400, 400); xc : = windowwidth div 2; yc : = windowheight div 2; line(0, yc, 2 * xc, yc); line(xc, 0, xc, 2 * yc); t : = 0; while t < = 2 * pi do begin x : = r * (sqr(cos(t)) * cos(t)); y : = r * (sqr(sin(t)) * sin(t)); x1 : = xc + round(x); y1 : = yc - round(y); putpixel(x1, y1, clgreen); t : = t + 0.001; end; setbrushcolor(clgreen); //setfillstyle(6, 12); //floodfill(xc, yc, clgreen); textout(50, 40, 'astroida'); textout(50, 60, 'x=r*cos^3(t) y=r*sin^3(t)'); str(r, s); textout(50, 80, 'pri r=' + s); end. текст у меню "справка": астроида это кривая, которую описывает фиксированная точка круга, с середины касаясь неподвижного круга раза большего радиуса, и катится по нему без скольжения

1.    Он американский ученый, основоположник кибернетики. А

также теории об искусственном интеллекте. Славу ему принесли его работы в

математике и физике. Его большая роль в том, что именно он впервые смог понять

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

управления.

2.      

Основатель теории информации, которая нашла свое место в современных

системах связи. В 40-х годах века ввел понятие «бит».

3.      

Термин, который означает «выполняющееся

действие по запросу», ввел Тед Нельсон в веке, в 1963 году.

4.      

В 1989 году. Изобретателем считают

двух человек – Тима Бернерс-Ли и Роберт Кайо.

5.      

Эйлер, в честь которого назвали графическую

схему, был ученым. Его сферой изучения была математика, физика, астрономия,

химия, ботаника, музыка, медицина и другие направления. Он автор 600 трудов. 

не за что!       и на сердечко

новые версии

Создание блок-схемы

Запустите Visio.

Выберите категорию Блок-схема.

Дважды щелкните значок блок-схема.

Для каждого этапа документируемого процесса перетащите в документ соответствующую фигуру блок-схемы.

Чтобы соединить элементы блок-схемы, наведите указатель мыши на первую фигуру, и щелкните стрелку, указывающую на фигуру, с которой требуется создать соединение. Если вторая фигура находится не рядом с первой, необходимо перетащить маленькую стрелку к центру второй фигуры.

Чтобы добавить текст для фигуры или соединительной линии, выделите ее и введите текст. По завершении ввода текста щелкните в пустой области страницы.

Чтобы изменить направление стрелки соединительной линии, выберите соединение, а затем на вкладке Фигура в группе Стили фигур щелкните пункт Линия, наведите указатель на пункт Стрелки и выберите нужное направление и вид стрелки.

Автоматическое выравнивание и интервалы

Нажмите сочетание клавиш CTRL+A, чтобы выбрать все объекты на странице.

На вкладке Главная в группе Упорядочение нажмите кнопку Положение и выберите пункт Автовыравнивание и определение интервалов.

Если это не привело к нужному результату, отмените ее, нажав сочетание клавиш CTRL+Z, и воспользуйтесь другими параметрами меню кнопок Выравнивание и Положение.

Пример блок-схемы, представляющей процесс предложения

Что представляют блок-схемы

При открытии шаблона блок-схема открывается набор элементов Фигуры блок-схемы. Каждая фигура в этом наборе представляет собой тот или иной этап процесса. Но фигуры не имеют какого-то универсального смысла, их значение определяется создателями и пользователями блок-схем. В большинстве блок-схем используется три или четыре вида фигур, и этот диапазон расширяется только по специфической необходимости.

При этом названия фигур в Visio указывают на их применение. Ниже описаны наиболее рас фигуры.

Начало/конец. Эту фигуру следует использовать для представления первого и последнего этапа процесса.

Фигура "Начало/Завершение"

Процесс. Фигура представляет собой стандартный этап процесса. Это одна из наиболее часто используемых фигур в любом процессе.

Фигура "Процесс"

Решение. Эта фигура используется в точке, где выбор следующего этапа зависит от принятого решения. Вариантов может быть несколько, но чаще всего их два: "да" и "нет".

Фигура "Решение"

Подпроцесс. Эту фигуру следует использовать для представления ряда этапов, которые в совокупности образуют подпроцесс, определенный в другом месте (часто на другой странице того же документа). Такой подход удобен, если блок-схема получается слишком большой и сложной.

Фигура "Заранее определенный процесс"

Документ. Эта фигура представляет этап, на котором создается документ.

Фигура "Документ"

Данные. Эта фигура указывает, что данные поступают в процесс или покидают его. Также эта фигура может представлять материалы. Иногда ее называют фигурой "Ввод/Вывод".

Фигура "Данные"

Ссылка на текущую страницу. Маленький круг показывает, что следующий (предыдущий) этап находится в другом месте документа. Эта фигура особенно полезна на больших блок-схемах, где в противном случае пришлось бы использовать длинный соединитель, который сложно отследить.

Фигура "Ссылка на текущую страницу"

Ссылка на другую страницу. При размещении этой фигуры на странице открывается диалоговое окно, в котором можно создать набор гиперссылок между двумя страницами блок-схемы или между фигурой "Подпроцесс" и отдельной страницей блок-схемы, на которой показаны этапы этого подпроцесса.

Фигура "Ссылка на другую страницу"