Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 06.03.2018
Сообщений: 1

Вывод на экран указанного количества концентрических окружностей

06.03.2018, 20:33. Показов 1875. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите пожалуйста
"Программа запрашивает у пользователя значение радиуса и количество окружностей
И выводит на экран указанное количество концентрических окружностей. Введенный радиус используется для расчета других радиусов остальных окружностей.
Например, пользователь ввел радиус = 10, количество окружностей = 5.
Берем этот радиус за минимум, а последующие значения радиусов должны быть кратны 10."
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
06.03.2018, 20:33
Ответы с готовыми решениями:

Построить n концентрических окружностей
Даны натуральные числа n, x, y, r1, c1, r2, c2, ..., rn,cn. Построить n концентрических окружностей с общим центром в точке (х, у), имеющих...

Построить несколько концентрических окружностей
Помогите пожалуйста сделать задание в QB. Построить несколько концентрических окружностей. Задать минимальный радиус, шаг его изменения и...

Нарисуйте пару десятков концентрических окружностей
Нарисуйте пару десятков концентрических окружностей, то есть окружностей разного радиуса, но имеющих общий центр.

1
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
07.03.2018, 05:49
Лучший ответ Сообщение было отмечено karl1998 как решение

Решение

Pascal
1
2
3
4
5
6
uses GraphABC;
begin
  var(r,n):=ReadInteger2;
  Brush.NETBrush := nil;
  for var i:=1 to n do Circle(Window.Center.X,Window.Center.Y,r*i);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
07.03.2018, 05:49
Помогаю со студенческими работами здесь

Мишень состоит из 3-х концентрических окружностей с радиусами 10, 20, и 30 см
Всем привет! Помогите пожалуйста с задачей Мишень состоит из 3-х концентрических окружностей с радиусами 10, 20, и 30 см. Попадание...

Вывести узор из разноцветных концентрических окружностей
Пожалуйста помогите написать эту программу могу только сделать один круг. #include "stdafx.h" #include...

Изобразить на экране построение концентрических окружностей
изобразить на экране построение концентрических окружностей , начиная от большей к меньшей и обратно

Модуль GRAPH. Узор из концентрических окружностей
Написать программу, которая выводит на экран, изображенный ниже узор. Контур окружностей должен быть разного цвета (см. таблицу кодировки...

Построить семейство концентрических окружностей с увеличивающимся радиусами
Построить семейство концентрических окружностей с увеличивающимся радиусами. Помогите пожалуйста!


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru