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

Составьте программу движения ракеты снизу вверх. pascal abc

Показать ответ
Ответ:
vikap754p08qzb
vikap754p08qzb
31.08.2020 06:54
Работа не моя:
Program raketa; uses graph;  var gd,gm:integer; begin  detectgraph (gd,gm);  initgraph (gd,gm,'C:\tp7 ');  line (300,60,240,120);  line (240,120,240,360);  line (360,120,360,360);  line (240,360,360,360);  line (300,60,360,120);  line (240,210,210,240);  line (210,240,240,240);  line (360,210,390,240);  line (390,240,360,240);  circle (300,150,15);  circle (300,210,15);  circle (300,270,15);  Bar (270,300,240,360);  line (240,360,180,450);  line (180,450,420,450);  line (420,450,360,360);  line (330,450,330,370);  line (300,450,300,365);  line (270,450,270,370);  line (240,330,180,330);  line (180,330,90,450);  line (172,330,80,445);  line (300,60,300,30); readln end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота