М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
panevin33vladik
panevin33vladik
21.10.2022 04:35 •  Информатика

через Pascal ABC инфоорматика​


через Pascal ABC инфоорматика​

👇
Ответ:
detsadraduga10
detsadraduga10
21.10.2022

uses GraphABC;

var

 p:array[0..7]of Point;

begin

 p[0].x := 100; p[0].y := 50;

 p[1].x := 200; p[1].y := 150;

 p[2].x := 200; p[2].y := 200;

 p[3].x := 100; p[3].y := 400;

 p[4].x := 150; p[4].y := 200;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2],p[3],p[4]); // хвост

 p[0].x := 200; p[0].y := 150;

 p[1].x := 200; p[1].y := 200;

 p[2].x := 300; p[2].y := 250;

 p[3].x := 500; p[3].y := 250;

 p[4].x := 550; p[4].y := 200;

 p[5].x := 550; p[5].y := 150;

 p[6].x := 500; p[6].y := 100;

 p[7].x := 300; p[7].y := 100;

 SetBrushColor(rgb(200,200,200));

 Polygon(p[0],p[1],p[2],p[3],p[4],p[5],p[6],p[7]); // тело

 p[0].x := 300; p[0].y := 100;

 p[1].x := 350; p[1].y := 50;

 p[2].x := 500; p[2].y := 100;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2]); // верхний плавник

 p[0].x := 300; p[0].y := 250;

 p[1].x := 350; p[1].y := 300;

 p[2].x := 500; p[2].y := 250;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2]); // нижний плавник

 SetBrushColor(rgb(0,0,0));

 rectangle(550,150,560,200); // рот

 SetBrushColor(rgb(70,70,70));

 circle(500,150,10); // внешний круг глаза

 SetBrushColor(rgb(0,0,0));

 circle(500,150,5); // внутренний круг глаза

end.

4,6(56 оценок)
Открыть все ответы
Ответ:
pavelvladlem
pavelvladlem
21.10.2022

те́кстовый реда́ктор — самостоятельная компьютерная программа или компонент программного комплекса (например, редактор исходного кода интегрированной среды разработки или окно ввода в браузере), предназначенная для создания и изменения текстовых данных в общем и текстовых файлов в частности[1].

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

виды текстовых редакторов: блокнот. это самый простой и незамысловатый текстовый редактор в windows.

notepad++

wordpad

libreoffice

microsoft word.

4,4(48 оценок)
Ответ:
Alikhan666
Alikhan666
21.10.2022
Алгоритм решения

рассмотрим первый тест. мы знаем, что карточки пронумерованы от 1 до n, и что утеряна была ровно одна карточка. пусть x равен сумме номеров всех карточек от 1 до n. тогда y равен сумме номеров карточек, что даны нам во вводе. значит, номер потерявшейся карточки - это x - y

x = 1 + 2 + 3 + 4 + 5 = 15

y = 3 + 5 + 1 + 4 = 13

ans = x - y = 15 - 13 = 2, ответ: 2.

правда, тогда придется "угадать" тест, где n равно единице, поскольку мы используем do-while для ввода. логично, что в наборе из одной карточки могла потеряться только эта единственная карточка.

код

дан в приложении.

4,8(8 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ