Вопрос по информатике:
Помогите, нужно составить программу в PASCAL ABC, которая будет рисовать 5 ёлок. Копировать с сайтов нет смысла, так как везде неверно. Главное условие, нужно сделать программу без ввода переменных. То есть использовать в ней переменные нельзя! Кому не сложно, помогите. Буду признателен. (Если не получится нарисовать именно 5 елок, то нарисуйте одну..главное, чтобы она была правильной)
- 19.01.2017 12:27
- Информатика
- remove_red_eye 11712
- thumb_up 26
Ответы и объяснения 1
uses GraphABC;
begin
For var i := 0 to 4 do
begin
SetBrushColor(clGreen);
FillPie(80 + 120 * i, 100, 25, -50, -130);
FillPie(80 + 120 * i, 115, 40, -50, -130);
FillPie(80 + 120 * i, 135, 60, -50, -130);
FillPie(80 + 120 * i, 160, 75, -50, -130);
SetBrushColor(clBrown);
FillRectangle(74 + 120 * i, 234, 86 + 120 * i, 245)
end;
end.
- 20.01.2017 13:54
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.