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

Измените программу так, чтобы маска улыбалась uses GraphABC;
begin
Chord(300,200,200,160,380);
Chord(200,200,50,180,360);
Chord(400,200,50,225,315);
Pie(300,250,50,225,315);
Arc(300,370,50,0,180);
end.​


Измените программу так, чтобы маска улыбалась uses GraphABC;begin Chord(300,200,200,160,380);Chord(2

Показать ответ
Ответ:
Mishan03
Mishan03
21.02.2021 22:40

uses GraphABC;

begin

SetWindowWidth(600);

SetWindowHeight(500);

SetPenWidth (3);

Line(111,131,489,131);

Arc(300,200,200,160,380);

Pie(200,220,50,0,180);

Pie(400,220,50,0,180);

Pie(300,250,50,225,315);

Arc(300,320,50,180,360)

end.

Объяснение:

картинка

Будет ли работать у тебя точно не знаю.

У тебя, возможно, будет работать в таком виде:

uses GraphABC;

begin

SetWindowWidth(600);

SetWindowHeight(500);

SetPenWidth (3);

Chord(300,200,200,160,380);

Chord(200,220,50,0,180);

Chord(400,220,50,0,180);

Pie(300,250,50,225,315);

Arc(300,320,50,180,360)

end.

Эти строчки:

SetWindowWidth(600);

SetWindowHeight(500);

SetPenWidth (3);

можно выкинуть, если с ними будут проблемы (это просто размеры окна и толщина линии)


Измените программу так, чтобы маска улыбалась uses GraphABC;begin Chord(300,200,200,160,380);Chord(2
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота