tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль абц,7 класс.требуется
Паскаль абц,7 класс.требуется написать программу в паскале где есть команды: circle/floodfill/line и т,д. картинка должна быть средней сложности!
aveiro1
1 23.06.2019 13:00
0
Ответы
evgenijpetrov
19.07.2020 11:52
Вот это 7 класс:)
USES Graph;
VAR Device, Mode: Integer; 50 100 150 200 250 300
BEGIN Device:=0;
InitGraph(Device, Mode, ’<путь к графическим драйверам>’);
PutPixel(50,100,White); Rectangle(150,150,50,200); {правый верхний и левый нижний углы}
Circle(200,100,50); {окружность} {отрезок прямой}
Floodfill (200,100, red);
Line(100,50,250,150);
ReadLn;
CloseGraph;
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
KrIs1girl
21.09.2021 13:14
помагиье я не понял тему теперь мучяюсь...
hooh232non666
05.01.2021 17:20
. Тренд - это ... А) направление моды; Б) среднее арифметическое значение ряда чисел; В) основная тенденция изменение определенного процесса....
анна10010
05.01.2021 17:18
Для обеспечения целостности данных в СУБД используют: А) специальные таблицы; Б) специальные формы; В) связи между таблицами; Г) специальные модули баз данных...
Виктория222222111
05.01.2021 17:08
С технического зрения P4DF1 может распознавать объекты на изображениях. То, что нужно для поисков Василия, не правда ли? Давай роботу упростить работу с изображением...
Василина914
05.01.2021 17:07
word de çalışma sayfanızın yönünü (yatay,dikey) değiştirmek için aşağıdaki hangi menü ve sekme kullanılır?...
Okean111
05.01.2021 16:55
Напишите функцию get_factors(num), принимающую в качестве аргумента натуральное число и возвращающую список всех делителей данного числа....
ДичьМэн
05.01.2021 16:42
Умножение многочленов алгоритмом Карацубы КОД НА С++ НЕ ПЫТАЙТЕСЬ ПИСАТЬ БРЕД...
steshina27
05.01.2021 16:26
Один символ текста занимает объём 4 бит на диске выделено 80 байт сколько символов можно записать на диск хелп...
ЕваЛя
05.01.2021 16:23
Объём сообщения состовляет 50 байт Текстовое сообщение содержит 80 символов Сколько букв алфавита было использовано?...
ffh5
05.01.2021 16:22
«Запись исходного кода программы на С++» Надо: 1. Организовать ввод строки 2. Подсчитать кол-во слов и вывести на печать. 3. Удалить слова «Запись» и «исходного» 4....
Популярные вопросы
У Віці было 35 марак на тэму «Птушкі». Сябру ён падарыў 9 марак,...
3
Дети на уроке труда сделали 17 открыток. Затем 9 открыток подарили,...
2
Даўжыня скрыначкі — 10 см, шырыня — 8 см. Колькі сантыметраў прапаўзе...
2
Для ўпрыгожвання залы купілі 14 чырвоных паветраных шарыкаў, зялёных...
1
Даўжыня прамавугольніка — 14 см, а шырыня — на 4 см меншая. Знайдзі...
1
Кола мае 10 спіц. Колькі прамежкаў паміж спіцамі?...
2
Длина прямоугольника — 14 см, а ширина — на 4 см меньше. Найди периметр...
3
Высота телеграфного столба — 6 м. Тополь выше столба на 3 м. Найди...
3
Пры дапамозе лічбаў 1, 4, 7 запішы ўсе магчымыя двухзначныя лікі....
1
У поездзе 10 вагонаў. Наш вагон сёмы, калі лічыць з «галавы» поезда....
3
USES Graph;
VAR Device, Mode: Integer; 50 100 150 200 250 300
BEGIN Device:=0;
InitGraph(Device, Mode, ’<путь к графическим драйверам>’);
PutPixel(50,100,White); Rectangle(150,150,50,200); {правый верхний и левый нижний углы}
Circle(200,100,50); {окружность} {отрезок прямой}
Floodfill (200,100, red);
Line(100,50,250,150);
ReadLn;
CloseGraph;
END.