Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.10.2011, 18:05   #1
CkaZoChNic
Новичок
Джуниор
 
Регистрация: 08.10.2011
Сообщений: 1
По умолчанию Рисование круга в Pascal

) Введите с клавиатуры переменные z и d. Если 100<z<200 и 100<d<200, то нарисуйте окружность радиусом 60, с центром в точке с координатами (z, d), иначе, выведите на экран значения этих переменных.

Задание ^

Спасибо, что открыли тему. проблема не в том, что бы проанализировать данные, а в том, как нарисовать круг. Меня не было на лекции, а с самообучение что-то туговато((
Не могли бы вы написать программку на паскале от program name; до end.?
Желательно с пояснениями...

borland pascal v.7
CkaZoChNic вне форума Ответить с цитированием
Старый 08.10.2011, 23:05   #2
rubius2008
Форумчанин
 
Регистрация: 19.03.2010
Сообщений: 409
По умолчанию

Во фрилансе любые капризы, за ваши деньги
Есть вопросы, пишите в ЛС.
rubius2008 вне форума Ответить с цитированием
Старый 09.10.2011, 00:34   #3
[CODER]
Форумчанин
 
Аватар для [CODER]
 
Регистрация: 02.02.2010
Сообщений: 305
По умолчанию

А поиском вам пользоваться запрещают?
могу реализовать эту программу за 99 рублей.
Skype: CODERua
[CODER] вне форума Ответить с цитированием
Старый 09.10.2011, 01:16   #4
TinMan
Форумчанин
 
Аватар для TinMan
 
Регистрация: 05.09.2011
Сообщений: 869
По умолчанию

Код:
readln(z,d);
if (100<z) and (z<200) and (100<d) and (d<200) then
  Circle(z,d,60)
else
  writeln(z,' ',d);
Переход в графический режим попробуй сделать сам. Задавай вопросы.
Предпочитаю на "ты".
TinMan вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Движение круга:) mitmikha Паскаль, Turbo Pascal, PascalABC.NET 2 12.04.2011 12:11
Площадь круга sturz Помощь студентам 20 23.01.2011 11:07
вписание круга в ромб !? Weyner Помощь студентам 2 21.12.2010 21:53
Рисование дуги круга по координатам(С++) Olya90 Помощь студентам 0 07.05.2009 13:52
Пересечение прямой и круга CoGnaC Паскаль, Turbo Pascal, PascalABC.NET 8 11.03.2008 17:01