Программа которая рисует домик в паскале

Мне задали в паскале нарисовать три домика (простые, из квадрата и двух линий) , помогите пожалуйста.

Ольга Попова

В паскале нет средств для рисования домиков.
В реализациях паскаля есть нужные библиотеки, но ты не указал, какой именно паскаль ты используешь (Тurbo/Borland Pascal, Delphi, FreePascal, PascalABC. NET или какой-то другой) .
Держи дом с трубой http://otvet.mail.ru/answer/416744879

Ольга Шепеленко

program dom;
uses graphABC;
begin
setwindowwidth(700);
setwindowheight(700);
setfontsize(18);
setfontcolor(clred);
textout(100,100,’домик’);
rectangle(200,300,600,600);
setbrushcolor(claqua);
circle(400,225,40);
setbrushcolor(claqua);
fillrect(300,400,500,500);
rectangle(300,400,500,500);
line(400,400,400,500);
line(300,450,500,450);
line(200,300,400,150);
line(400,150,600,300);
end.

Источник: sprashivalka.com

Используя модуль Graph ABC, нарисуем дом

Программа которая рисует домик в паскале

Если нужно — используйте.
Что не получается?

мне нужна только картинка, которая находится во 2й четверти(деление на четверти должно быть)

так все картинки во всех четвертях одинаковы
а в остальных четвертях вашего рисунка что должно быть? пусто?
оператор цикла для рисования забора нужен?

нарисовать дом в Паскале!

графика в разных Паскалях очень сильно отличается.
Поэтому обязательно указывайте, какой у Вас Паскаль.

Пользователь
Регистрация: 24.02.2017
Сообщений: 20

мне не понятен оператор цикла для одинаковых частей! к примеру:
. (идёт программа)
и вот нужны необходимые одинаковые детали
я не понимаю как работать с циклами для рисования! или как это делать через процедуру?

uses crt,graphABC; begin setwindowwidth(800); setwindowheight(600); line(0,300,800,300); line(400,0,400,600); rectangle(0,0,400,300); floodfill(2,2,clcyan); setpencolor(clgreen); rectangle(100,70,300,230); floodfill(101,71,clgreen); setpencolor(clyellow); //нужно в цикле rectangle(120,90,160,140); floodfill(122,99,clyellow); setpencolor(clgreen); line(140,90,140,160); setpencolor(clred); line(100,70,200,40); line(200,40,300,70); floodfill(121,66,clred); setpencolor(clblack); line(250,55,250,35); line(250,35,270,35); line(270,35,270,62); floodfill(255,40,clblack); setpencolor(clorange); //нужно в цикле line(0,300,0,200); line(0,200,15,180); line(15,180,30,200); line(30,200,30,300); floodfill(10,196,clorange); end.
_____
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ)
Модератор
Последний раз редактировалось Вадим Мошев; 05.04.2017 в 21:52 .

Читайте также:
Необходимые программы для iOs

Источник: www.programmersforum.ru

Программа которая рисует домик в паскале

Melsi5

Как нарисовать домик в PascalABC.NET ?

November 2022 1 3 Report

Задание по информатике.
Напишите программу рисования домиков в паскале, использующую процедуры с параметрами.

Answers https://scholar.tips/140525c502cc1a00d8e7186c78608c69.html» target=»_blank»]scholar.tips[/mask_link]

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru