В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
kisnasty951
kisnasty951
24.03.2023 07:45 •  Информатика

Чертёжнику был дан для ис¬пол¬не¬ния сле¬ду¬ю¬щий алгоритм:

Повтори 3 paза

Сместиться на (1, 1) Сме¬стить¬ся на (2, 2) Сме¬стить¬ся на (1, −3) Конец

Какую ко¬ман¬ду надо вы¬пол¬нить Чертёжнику, чтобы вер¬нуть¬ся в ис¬ход¬ную точку, из ко¬то¬рой он начал движение?

1) Сместиться на (12, 0)

2) Сместиться на (0, 12)

3) Сместиться на (0, −12)

4) Сместиться на (−12, 0)

Показать ответ
Ответ:
Shkola17032004
Shkola17032004
29.09.2021 05:27

перо Сместиться в точку (1,7) Сместиться в точку (1,5) Поднять перо Сместиться на вектор (0,-2) Опустить перо Сместиться на вектор (2,0) Сместиться в точку (3,5) Сместиться на вектор (-2,0) Поднять перо Сместиться в точку (4,5) Опустить перо Сместиться на вектор (2,0) Поднять перо Сместиться в точку (5,6) Опустить перо Сместиться в точку (5,4) Поднять перо Сместиться в точку (7,3) Опустить перо Сместиться на вектор (2,0) Сместиться на вектор (0,4) Сместиться в точку (7,7) Сместиться в точку (7,5) Сместиться в точку (9,5) Поднять перо В ответе укажите только число, без пробелов и каких-либо знаков препинания, например 100 ответ:

Объяснение:

0,0(0 оценок)
Ответ:
Meow100
Meow100
19.09.2022 20:30

program z1;

uses graphABC;

begin

SetWindowSize(600,400);

SetWindowTitle('¨ëêà');

SetPenWidth(3);

SetPenColor(clBlack);

Line(250,100,300,50);

Line(300,50,350,100);

Line(350,100,250,100);

FloodFill(300,75,clGreen);

Line(235,200,300,100);

Line(300,100,365,200);

Line(365,200,235,200);

FloodFill(300,175,clGreen);

Line(200,300,300,200);

Line(300,200,400,300);

Line(400,300,200,300);

FloodFill(300,275,clGreen);

MoveTo(0,300);

LineTo(100,350);

LineTo(200,325);

LineTo(400,325);

LineTo(500,350);

LineTo(600,375);

FloodFill(15,375,clLime);

Rectangle(287,300,313,325);

FloodFill(300,315,clBrown);

SetBrushColor(clYellow);

Circle(500,100,50)

end.

Объяснение:

картинка


Составьте программу для рисования ёлочки в Pascal ABC ​
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота