Составьте программу, которая рисует квадрат, заштрихованный наполовину линиями, параллельными диагонали

@Левушка · Регистрация: 16.11.2017

Author24 — интернет-сервис помощи студентам

Составьте программу, которая рисует квадрат заштрихованный наполовину линиями, параллельными диагонали альфа

@Puporev · 16.11.2017, 20:04

Сообщение от Левушка

параллельными диагонали альфа

Это как?

Добавлено через 11 минут
Так что ли?

Pascal

uses graphABC;
var c,a,d,n,i:integer;
begin
setwindowsize(500,500);
centerwindow;
c:=250;
a:=200;
n:=10;
rectangle(c-a,c-a,c+a,c+a);
d:=2*a div n;
for i:=0 to n-1 do
line(c-a,c-a+i*d,c+a-i*d,c+a);
end.

@Левушка · 17.11.2017, 14:23 **[ТС]**

Не, неправильно у тебя(

@Puporev · 17.11.2017, 14:31

С понтом ты написал как надо, приложи картинку если ума нет написать словами.

@Левушка · 17.11.2017, 14:48 **[ТС]**

Я не могу картинку приложить, я не знаю как(

@Puporev · 17.11.2017, 14:50

Нажми кнопку в виде канцелярской скрепки над окном сообщений справа. Там разберешься.

@Левушка · 17.11.2017, 16:45 **[ТС]**

Не знаю вышла картинка или нет?

@Puporev · 17.11.2017, 16:47

А ты посмотри в свое сообщение.

@Puporev · 17.11.2017, 16:53

Нажми кнопку в виде канцелярской скрепки.

Составьте программу, которая рисует квадрат, заштрихованный наполовину линиями, параллельными диагонали

Откроется окно, выбери файл и нажми Загрузить.

После окончания загрузки нажми Закрыть окно.

@Левушка · 17.11.2017, 17:25 **[ТС]**

У меня не загружается, пишет маркер безопасности отсутствует

magirus · 17.11.2017, 17:41

попробуйте обновить страницу. или выйти с форума и зайти по новой.

@Левушка · 20.11.2017, 17:23 **[ТС]**

вот,я наконец-то зашел с пк
спасибо за подсказку как добавить картинку
желательно все 4 задания

(Вложение удалено, необходимый контент перенесён на форум)

Составить программу, которая рисует квадрат, заштрихованный наполовину линиями, параллельными диагонали α, как показано на рисунке:

Название: 1.png
Просмотров: 8

Размер: 855 байт

Название: 1.png
Просмотров: 8

Размер: 855 байт

@Puporev · 20.11.2017, 17:30

Сообщение от Левушка

желательно все 4 задания

Для 2-4 заданий создайте свои темы, где руками напечатайте задания в темах.

Добавлено через 4 минуты

Pascal

uses graphABC;
var c,a,d,n,i:integer;
begin
setwindowsize(500,500);
centerwindow;
c:=250;
a:=200;
n:=10;
rectangle(c-a,c-a,c+a,c+a);
d:=2*a div n;
for i:=0 to n-1 do
line(c+a-i*d,c-a,c-a,c+a-i*d);
end.

@Левушка 0 / 0 / 0 Регистрация: 16.11.2017 Сообщений: 12
	20.11.2017, 17:23 [ТС]	12
	вот,я наконец-то зашел с пк спасибо за подсказку как добавить картинку желательно все 4 задания (Вложение удалено, необходимый контент перенесён на форум) Составить программу, которая рисует квадрат, заштрихованный наполовину линиями, параллельными диагонали α, как показано на рисунке: 0

@Левушка 0 / 0 / 0 Регистрация: 16.11.2017 Сообщений: 12
	17.11.2017, 14:23 [ТС]	3
	Не, неправильно у тебя( 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.11.2017, 14:31	4
	С понтом ты написал как надо, приложи картинку если ума нет написать словами. 0

@Левушка 0 / 0 / 0 Регистрация: 16.11.2017 Сообщений: 12
	17.11.2017, 14:48 [ТС]	5
	Я не могу картинку приложить, я не знаю как( 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.11.2017, 14:50	6
	Нажми кнопку в виде канцелярской скрепки над окном сообщений справа. Там разберешься. 0

@Левушка 0 / 0 / 0 Регистрация: 16.11.2017 Сообщений: 12
	17.11.2017, 16:45 [ТС]	7
	Не знаю вышла картинка или нет? 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.11.2017, 16:47	8
	А ты посмотри в свое сообщение. 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.11.2017, 16:53	9
	Нажми кнопку в виде канцелярской скрепки. Откроется окно, выбери файл и нажми Загрузить. После окончания загрузки нажми Закрыть окно. 0

@Левушка 0 / 0 / 0 Регистрация: 16.11.2017 Сообщений: 12
	17.11.2017, 17:25 [ТС]	10
	У меня не загружается, пишет маркер безопасности отсутствует 0

magirus Почетный модератор 28045 / 15778 / 982 Регистрация: 15.09.2009 Сообщений: 67,752 Записей в блоге: 78
	17.11.2017, 17:41	11
	попробуйте обновить страницу. или выйти с форума и зайти по новой. 0

	20.11.2017, 17:30

Опции темы