Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
kasper121314
10.05.2020 00:15 •
Информатика
6. Познакомьтесь с программой n=[11, 22, 33, 44, 55, 66, 77]
n[2], n[4]=n[4], n[2]
Выберите правильные ответы
n[2]=55
n[4]=33
n[2]=44
n[4]=22
👇
Увидеть ответ
Открыть все ответы
Ответ:
gfsfsdcxz
10.05.2020
Uses graph; var gd,gm,c,i:integer; p:array[1..12] of Pointtype; begin gd:=detect; initgraph(gd,gm,''); setcolor(10); circle(340,105,50); Setfillstyle(1,10); fillellipse(340,105,50,50); setcolor(12); circle(290,170,50); Setfillstyle(1,12); fillellipse(290,170,50,50); setcolor(13); circle(390,190,50); Setfillstyle(1,13); fillellipse(390,190,50,50); p[1].x:=240;p[1].y:=190; p[2].x:=440;p[2].y:=190; p[3].x:=440;p[3].y:=240; p[4].x:=345;p[4].y:=265; p[5].x:=345;p[5].y:=365; p[6].x:=440;p[6].y:=390; p[7].x:=240;p[7].y:=390; p[8].x:=335;p[8].y:=365; p[9].x:=335;p[9].y:=265; p[10].x:=240;p[10].y:=240; p[11].x:=p[1].x;p[11].y:=p[1].y; setcolor(11); moveto(p[1].x,p[1].y); for i:=1 to 11 do lineto(p[i].x,p[i].y); Setfillstyle(1,11); fillpoly(11,p); readln end.
4,8
(58 оценок)
Ответ:
akzhanovarnai2
10.05.2020
Uses graph; var gd,gm,c,i:integer; p:array[1..12] of Pointtype; begin gd:=detect; initgraph(gd,gm,''); setcolor(10); circle(340,105,50); Setfillstyle(1,10); fillellipse(340,105,50,50); setcolor(12); circle(290,170,50); Setfillstyle(1,12); fillellipse(290,170,50,50); setcolor(13); circle(390,190,50); Setfillstyle(1,13); fillellipse(390,190,50,50); p[1].x:=240;p[1].y:=190; p[2].x:=440;p[2].y:=190; p[3].x:=440;p[3].y:=240; p[4].x:=345;p[4].y:=265; p[5].x:=345;p[5].y:=365; p[6].x:=440;p[6].y:=390; p[7].x:=240;p[7].y:=390; p[8].x:=335;p[8].y:=365; p[9].x:=335;p[9].y:=265; p[10].x:=240;p[10].y:=240; p[11].x:=p[1].x;p[11].y:=p[1].y; setcolor(11); moveto(p[1].x,p[1].y); for i:=1 to 11 do lineto(p[i].x,p[i].y); Setfillstyle(1,11); fillpoly(11,p); readln end.
4,5
(12 оценок)
Это интересно:
Д
Дом-и-сад
27.05.2023
Основы электротехники: Как разрядить конденсатор...
З
Здоровье
01.09.2021
Как отвлечь себя от голода: полезные советы...
К
Кулинария-и-гостеприимство
23.10.2021
Как приготовить баннок: легкий и вкусный рецепт...
К
Кулинария-и-гостеприимство
11.11.2022
Сладкий рецепт: американские панкейки с нутеллой...
К
Кулинария-и-гостеприимство
04.04.2021
Как готовить только для себя: полезные советы и рецепты...
Д
Дом-и-сад
23.11.2020
Как навести порядок в гараже: полезные советы от специалистов...
Т
Транспорт
08.01.2020
Как рассчитать первоначальный взнос за автомобиль...
О
Образование-и-коммуникации
10.06.2022
Заставьте свой мозг работать на 100%: как повысить продуктивность обучения...
З
Здоровье
01.06.2020
Сбалансированная диета: советы для тех, кто хочет оставаться здоровым и энергичным...
К
Кулинария-и-гостеприимство
13.01.2020
10 лучших советов: как запекать мясо...
Новые ответы от MOGZ: Информатика
анабель125
02.02.2022
Ребят с информатикой Это задания.)...
natachernov
08.08.2020
Какие операторы используются при программировании а) линейных алгоритмов? б) разветвляющих алгоритмов? в) циклических структур алгоритмов?...
chipssensey
19.04.2021
Чтобы изменить цвет фона в графическом редакторе paint необходимо выполнить что...
sha14558538
11.05.2023
Какие есть команды вывода текущей директории в консоли linux:...
anastasiyademy1
11.05.2023
Взаданном двумерном массиве заменить все нечетные элементы на 26. решить на pascalabc.net. оформить в виде !...
khudobeidiana
11.05.2023
Дан двумерный массив размером 6×6. массив задается генератором случайных чисел.поменять местами в каждой строке минимальный и последний элемент. решить на pascalabc.net...
kachanovskiyge
11.05.2023
Вычислить произведение элементов вектора l(28) меньших 1 в паскале...
Elizabeth1006
08.06.2022
Почему можно рассматривать компьютерную презентацию как важное коммуникативное средство...
Волвлчлчлч
08.06.2022
Pascal отсортировать по возрастанию положительные элементы массивы вывести исходный и изменить массивы можно использовать любой метод сортировки массив заполнить...
trisk
08.06.2022
Как с разметки обеспечить печать на нестандартном размере бумаги...
MOGZ ответил
Какие страны южной америки расположены в пределах : а) бассейна...
4.к окружности с центром 0 и радиусом 12 см проведена касательная...
Подробное изложение этого текста. по вечерам, когда шумная жизнь...
Основные признаки животных организмов...
Решите уравнение: 0,8 (2,2 (х-1)-1)-1,4х=-0,4...
Приближенных значения числа 1,80621...
Ребро куба авсда1в1с1д1 равно а см.найдите расстояние между прямыми...
Синоним к слову молва и составить с ними словосочетания и предложение...
Скакой скорости двигался автомобиль если за 3 часа он проехал...
Чем уроки отличаются от других уроков?...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ