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

Зал имеет форму правильного шестиугольника.
винтик и шпунтик решили разбить его на несколько
частей, состоящих из правильных шестиугольников. вот
что у них получилось. напиши программу, для вывода
этой схемы на экране компьютера. для решения можно
использовать любой известный тебе язык
программирования. перед построение схемы программа
должна запрашивать длину стороны маленького
шестиугольника.
у меня завтра олипиада

Показать ответ
Ответ:
sahakohela
sahakohela
03.05.2021 22:41

1. ответ a)верно b)верно c)неверно d)верно e)верно

Объяснение: 1)ScanDisk-программа для исправления ошибок структур жестких дисков

2)Вследствие засорения реестра путем появления неверных записей, неочищенный кэш и мусор от установленных программ

3)Disk Cleanup-программа для очистки компьютера от всевозможного мусора, неиспользуемых системных файлов и следов работы в браузерах

4)Обычно программа перестаёт отвечать на действия пользователя, а курсор превращается в песочные часики. В этом случае в заголовке программы в скобках может быть написано «(Не отвечает)». Все попытки закрыть программу на «крестик» ничего не дают, либо крестик нажать не удаётся

5) Открыть диспетчер задач и во вкладке процессы снять задачу

0,0(0 оценок)
Ответ:
nactya201613
nactya201613
24.01.2020 05:52

Анимации делать не умею и нечего не знаю вот код:

Объяснение:

program eg;

uses graph,crt;

var

y,x,i,n,d,m,j:integer;

begin

randomize;

detectgraph(d,m);

initgraph (d,m,' \TP\GRAPH');

for i:=1 to 300 do begin

cleardevice;

setcolor(12);

line(150,380-i,150,420-i);

line(170,380-i,170,460-i);

line(190,380-i,190,420-i);

setcolor(5);

for j:=1 to 200 do begin

putpixel(random(300) ,410-j, random(100) );

end;

setcolor(1 );

setbkcolor(15);

rectangle(120,160-i,220,380-i);

line(170,80-i,120,160-i);

line(170,80-i,220,160-i);

circle(170,210-i,35);

if i<100 then begin

line(120,280-i,80,380-i);

line(80,380-i,120,380-i);

line(120,280-i,120,380-i);

line(220,280-i,260,380-i);

line(220,380-i,260,380-i);

line(220,380-i,220,380-i);

end

else begin

delay (10);

end;

readkey;

end;

end.

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