Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
The0dium
0 / 0 / 0
Регистрация: 30.01.2011
Сообщений: 8
1

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

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

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

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

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

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

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

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

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

Вывести на экран монитора треугольник и закрасить его
Вывести на экран монитора треугольник и закрасить его светло-синим (LightBlue)...

Вывести на экран монитора пятиугольник и закрасить его
Вывести на экран монитора пятиугольник и закрасить его светло-зелёным...

1
Puporev
Модератор
54686 / 42104 / 29072
Регистрация: 18.05.2008
Сообщений: 99,357
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

Вывести на экран монитора круг и закрасить его
Вывести на экран монитора круг и закрасить его коричневым (Brown) цветом с...

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

Вывести на экран монитора шестиугольник и закрасить его желтым цветом
Вывести на экран монитора шестиугольник и закрасить его желтым (Yellow) цветом...


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

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

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