Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
24 / 2 / 0
Регистрация: 14.12.2016
Сообщений: 19

Составить программы

26.12.2016, 11:48. Показов 874. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить программы для построения на экране следующих изображений
Изображения
 
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
26.12.2016, 11:48
Ответы с готовыми решениями:

составить программы
Помогите составить программы: 1) Протабулировать указанную функцию на отрезке : Функцию У=Cos(x^2), сделав n шагов. 2)...

Составить программы
Использовать цикл с параметром или цикл с предусловием №1 Составить программу, проверяющую, является ли заданное число...

Составить программы в Pascal
1. Сколько раз в данной строке встречается символ "а"? 2. Если длина строки нечетное число, то удалить среднюю букву. 3. Заменить все...

2
Почетный модератор
Эксперт по компьютерным сетямЭксперт Windows
 Аватар для magirus
28049 / 15785 / 983
Регистрация: 15.09.2009
Сообщений: 67,752
Записей в блоге: 78
26.12.2016, 11:56
начинайте.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
26.12.2016, 17:15
Лучший ответ Сообщение было отмечено Belaa как решение

Решение

Примерно так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses graphABC;
var c,r1,r2,i:integer;
begin
setwindowsize(500,500);
centerwindow;
c:=250;
r1:=5;
r2:=16;
for i:=1 to 7 do
 begin
  if odd(i) then
   begin
    circle(c-r2,c,r1);
    circle(c,c-r2,r1);
    circle(c+r2,c,r1);
    circle(c,c+r2,r1);
   end
  else
   begin
    circle(c-r2,c-r2,r1);
    circle(c+r2,c-r2,r1);
    circle(c+r2,c+r2,r1);
    circle(c-r2,c+r2,r1);
    r2:=round(2.2*r2);
   end;
  r1:=round(1.5*r1);
 end;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
26.12.2016, 17:15
Помогаю со студенческими работами здесь

составить текст программы
Просьба помочь составить текст программы.

Составить модуль программы
1. Составить модуль программы вычисления простых чисел и вычислить сто простых чисел. 2. Выбрать из полученного списка простых чисел два...

Составить алгоритм программы
Составить алгоритм программы, в которой предусмотреть ввод исходных данных с клавиатуры, вычисление значения функции по заданной формуле,...

Составить блок схему программы
составить блок схему программы: program aaaaa; const n=100000; var x,s:real; a:array of real; i: integer; begin s:=0; ...

нужно составить две программы
1. Составить программу для вычисления высоты треугольника, проведенной из вершины B, по формуле: h = 2 (p (pa) (pb) (pc)) ^1 / 2) / b,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru