tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Нарисовать картинку машины через
Нарисовать картинку машины через процедуры подпрограммы в pascal
Maria404404
1 20.09.2019 08:40
3
Ответы
kseniyapolozhe
08.10.2020 04:12
Uses graphabc;
begin // Кузов
Rectangle(340,220, 540, 300);
// Багажник
Rectangle(140,140, 340, 300);
FloodFill(220, 220, clBrown); // Закразка кузова
FloodFill(460, 260, clGray); // Закразка багажника
// Дверь в кабину
Rectangle(220,180, 300, 260);
Circle(280, 220, 10); // Ручка двери
// Фара
Circle(140, 260, 10);
// Первое колесо
Circle(220, 340, 40);
// Второе колесо.
Circle(420, 340, 40);
// Дорога
Line(60,380, 560, 380);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
мила0770
19.04.2021 10:41
C++ задані числа а, b, c. порахувати суму чисел, значення яких знаходиться в діапазоні від 2 до 8, а також добуток чисел, які не потрапляють в цей діапазон ( )...
Eveliinaa
19.04.2021 10:42
В каком году началась развиваться всемирная сеть?...
bahromt1999200
07.05.2019 09:29
Укажите максимальное трёхзначное число в системе счисления с основаниес 6 ответ укажите в десетичной системе счисления...
89538277266
07.05.2019 09:28
Перевести программу с циклом while...
bondarsvetlana25
07.05.2019 09:27
Уровень a.на вход программы поступает неизвестное количество чисел целых, ввод заканчивается нулём. определить, сколько получено чисел, которые делятся на 3. уровень b.на...
ebanat3
07.05.2019 12:11
Написать программу по информатике в паскале художник сергей петрович рисует большую картину за неделю, а маленькую за день. рассчитайте все возможные варианты рисования...
toshakalashnik
19.05.2020 14:30
Задание 3Хоровод1. ЕСЛИ в слове больше 3 гласных, то запишите его наоборотИНАЧЕ удалите первую букву2. Поделите слово пополам и половинки поменяйте местами3. В конец слова...
yliana63
19.05.2020 14:41
Информатика 8 класс. Подалуйста...
ktdgegrbyfk
01.06.2019 07:20
Задан массив c , состоящий из 10 элементов. переписать его в массив b в обратном порядке...
stovhelen
28.07.2019 05:50
За 3 ч автобус преодолевает такое же расстояние какое проедет поезд за 2 ч.туристы ехали 4 ч на автобусе и 3ч на поезде а всего они проехали 408 км.найдите скорость автобуса...
Популярные вопросы
1 Назвіть прізвище кошового отамана Запорозької Січі, який підтримав...
2
В рамках ЛР 1 необходимо выполнить приложения 4.5,6: 1. Расчет затрат...
3
E) Тема: Насичені аміни 1. опрацювати параграф 26.2. Виконати вправи:а)...
1
Поставьте предложения в вопросительную и отрицательную формы 1. I was...
2
Чему равно удельное сопротивление материала, из которого сделана проволока...
2
- 500 . Скласти рівняння реакцій за схемами: Ba+O 2 BaO Na+O 2 Na 2...
2
вітаю! сьогодні пропоную працювати за наступним алгоритмом: 1. я задавала...
3
«Знайди зайве речення» Проаналізуйте речення. Дослідіть, яке з них у...
3
Знайди сумижни кути (a;b) и (b;c) якщо кут (a;b) бильшый за кут(b;c)...
2
Відновіть і запишіть прислів’я, утворивши від прислівників, що в дужках,...
3
begin // Кузов
Rectangle(340,220, 540, 300);
// Багажник
Rectangle(140,140, 340, 300);
FloodFill(220, 220, clBrown); // Закразка кузова
FloodFill(460, 260, clGray); // Закразка багажника
// Дверь в кабину
Rectangle(220,180, 300, 260);
Circle(280, 220, 10); // Ручка двери
// Фара
Circle(140, 260, 10);
// Первое колесо
Circle(220, 340, 40);
// Второе колесо.
Circle(420, 340, 40);
// Дорога
Line(60,380, 560, 380);
end.