Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
megasvo111
0 / 0 / 0
Регистрация: 13.12.2012
Сообщений: 1
1

объектно ориентированное программирование

16.12.2012, 20:04. Просмотров 246. Ответов 0
Метки нет (Все метки)

ПОМОГИТЕ ПОЖАЛУЙСТА

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
29
30
31
32
33
34
35
36
uses Crt; 
type Win = Object 
x1, y1, x2, y2, cf: byte; 
procedure Init(Xn1, Yn1, Xn2, Yn2, Cfn: byte); 
procedure MakeWin; 
end; 
 
Procedure Win.Init(Xn1, Yn1, Xn2, Yn2, Cfn: byte); 
begin 
x1:=Xn1; 
y1:=Yn1; 
x2:=Xn2; 
y2:=Yn2; 
cf:= Cfn; 
end; 
 
procedure Win.MakeWin; 
begin 
Window(x1, y1, x2, y2); 
TextBackGround(cf); 
clrscr; 
end; 
 
var 
Winvar: Win; 
 
begin 
clrscr; 
with Winvar do 
begin 
Init(12,12,22,33,12); 
MakeWin; 
writeln('Color=', cf, ' Size of x=', x2-x1+1, ' Size of y=', y2-y1+1); 
end; 
readln; 
end.
ЗАДАНИЕ!!!!!!!!!!!!!!!!!!!!
3б. Инициализировать поля в основной части программы операторами присваивания.
3г. Оформить в виде отдельных методов определение размеров окна по горизонтали и вертикали RazmX, RazmY.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.12.2012, 20:04
Ответы с готовыми решениями:

Объектно-ориентированное программирование
Опишите тип объектов – прямоугольник с параметрами: координаты вершин, стороны, цвет. Пусть...

Объектно-ориентированное программирование
1. Полиморфизм. Свойства. 2. Инкапсуляция. Свойства.

Объектно - ориентированное программирование
Разработать пользовательский модуль, содержащий данные и методы об объекте телефонный номер (поля:...

Объектно-ориентированное программирование
Помогите решить задачу, пожалуйста. Используя объектно-ориентированное программирование, определить...

Объектно-ориентированное программирование
Составить описание класса прямоугольников со сторонами, параллельными осям координат. Предусмотреть...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.12.2012, 20:04

Объектно-ориентированное программирование
Добрый вечер, очень надеюсь на Вашу помощь! Тема: Объектно-ориентированное программирование ...

Объектно-ориентированное программирование
Составьте, пожалуйста, 3 программы: 1) просто использование объекта(ов); 2) первая прога, только с...

Объектно-ориентированное программирование: перевернуть список
Составить программу, которая переворачивает список L, т.е изменяет ссылки в этом списке так, чтобы...


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

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

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