Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
The0dium
0 / 0 / 0
Регистрация: 30.01.2011
Сообщений: 8
#1

Закрасить экран в черный и белый цвета - Turbo Pascal

27.02.2011, 16:39. Просмотров 665. Ответов 1
Метки нет (Все метки)

1.Составить программу, которая при нажатии клавиши "пробел" одну половину экрана красит в белый цвет, а вторую в черный.

2.Программа, которая при нажатии клавиши "д" рисует солнце, а при нажатии "н" рисует луну.

3.Термометр, у которого при нажатии "стрелка вверх" ртутный столбик поднимается, а при нажатии "стрелка вниз" ртутный столбик опускается

Заранее огромнейшее спасибо)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.02.2011, 16:39
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Закрасить экран в черный и белый цвета (Turbo Pascal):

Разделить экран двумя диагоналями на четыре части и закрасить их в разные цвета - Turbo Pascal
Разделить экран двумя диагоналями на четыре части и закрасить их в разные цвета.

Окрасить одну половину экрана в белый цвет, а вторую - в черный - Turbo Pascal
Использование модуля Graph. Составить программу, которая при нажатии, клавиши "пробел" одну половину экрана красит в белый цвет, а вторую-...

Выведите на экран 16 случайных чисел 16-ю разными цветами на черный экран - Turbo Pascal
Выведите на экран 16 случайных чисел 16-ю разными цветами на черный экран.в Turbo Pascal 7

Вывести на экран монитора круг и закрасить его - Turbo Pascal
Вывести на экран монитора круг и закрасить его коричневым (Brown) цветом с обратной наклонной заполнением (LtBkSlashFill), цвет фона экрана...

Вывести на экран монитора пятиугольник и закрасить его - Turbo Pascal
Вывести на экран монитора пятиугольник и закрасить его светло-зелёным (LightGreen) цветом с заполнением редкими точками (WideDotFill), цвет...

Вывести на экран монитора треугольник и закрасить его - Turbo Pascal
Вывести на экран монитора треугольник и закрасить его светло-синим (LightBlue) цветом с наклонным заполнением (LtSlashFill), цвет фона...

1
Puporev
Модератор
52845 / 40656 / 13909
Регистрация: 18.05.2008
Сообщений: 94,381
27.02.2011, 17:08 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
1.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt,graph;
var c:char;
    x,y:integer;
begin
x:=0;
initgraph(x,y,'');
outtextXY(getmaxX div 2-50,20,'Press key Spase...');
c:=readkey;
if c=#32 then
 begin
  cleardevice;
  setcolor(15);
  rectangle(0,0,getmaxX div 2,getmaxY);
  setfillstyle(1,15);
  floodfill(10,10,15);
 end;
readkey
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.02.2011, 17:08
Привет! Вот еще темы с ответами:

Вывести на экран монитора шестиугольник и закрасить его желтым цветом - Turbo Pascal
Вывести на экран монитора шестиугольник и закрасить его желтым (Yellow) цветом с заполнением плотными точками (CloseDotFill), цвет фона...

Вывести на экран незакрашенные фигуры и закрасить их при нажатии клавиш - Turbo Pascal
Пожалуйста помогите с заданиями! Графику вообще не понимаю... А задания надо сдать срочно!.... #1 ...

Вывести на экран монитора круговой сектор и закрасить его зеленым цветом - Turbo Pascal
Вывести на экран монитора круговой сектор и закрасить его зеленым (Green) цветом с наклонным заполнением (LtSlashFill), ...

В зависимости от введенного с клавиатуры целого числа закрасить экран соответствующим цветом - Pascal
1)В зависимости от введенного с клавиатуры целого числа закрасить экран соответствующим цветом. если введенное число не входит в...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.