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

Анимируйте полоски на дороге, дом и облака, в сторону обратную от машины:

uses graphaBC;
procedure avto(x,y:integer);
begin
setpencolor(cllightBlue);
setbrushcolor(cllightblue);
rectangle(0,0,10000, 290);
setpencolor(cllime);
setbrushcolor(cllime);
rectangle(0,290,10000, 480);
setpencolor(cllime);
setbrushcolor(cllime);
rectangle(0,700,10000, 1000);
setpencolor(cldarkgray);
setbrushcolor(cldarkgray);
rectangle(0,480,10000, 700);
setpencolor(clWhite);
setbrushcolor(clWhite);
rectangle(25,580,140, 600);
rectangle(205,580,320, 600);
rectangle(395,580,510, 600);
rectangle(575,580,690, 600);
rectangle(755,580,870, 600);
rectangle(935,580,1050, 600);
rectangle(1115,580,1230, 600);
rectangle(1295,580,1410, 600);
rectangle(1475,580,1590, 600);
SetPenColor(clblack);
SetBrushColor(clblue);
Rectangle(320, 170, 515, 320);
SetPenColor(cllightgray);
SetBrushColor(cllightgray);
Rectangle(460, 160, 485, 100);
SetPenColor(clblack);
line(460, 128, 460, 100);
line(460, 100, 485, 100);
line(485, 100, 485, 144);
SetPenColor(clblack);
line(305, 170, 525, 170);
line(415, 100, 525, 170);
line(415, 100, 305, 170);
FloodFill(375,135,cllightgray);
SetBrushColor(clmaroon);
SetBrushColor(cllightcyan);
Rectangle(420, 200, 490, 270);
SetBrushColor(clyellow);

line(455, 200, 455, 270);
line(420, 235, 490, 235);
SetBrushColor(clwhite);
SetPenColor(clwhite);
Circle(200,78,19);
Circle(365,84,20);
Circle(5,69,10);
Circle(280,70,50);
Circle(330,79,35);
Circle(230,74,30);
Circle(60,60,30);
Circle(25,65,20);
Circle(95,65,20);
SetBrushColor(clbrown);
SetPenColor(clbrown);
Rectangle(335, 220, 395, 320);

setpencolor(clblack);
setbrushcolor(clblack);
rectangle(x+4,y+290,x+72,y+340);
rectangle(x,y+315,x+111,y+340);
setpencolor(clBlack);
setbrushcolor(clBlack);
circle(x+98,y+345,10);
circle(x+15,y+345,10);
setpencolor(clgray);
setbrushcolor(clgray);
circle(x+98,y+345,8);
circle(x+15,y+345,8);
line(x+72,y+290,x+84,y+315 );
line(x,y+315,x+4,y+290);
FloodFill(x+2,y+314,cllightblue);
FloodFill(x+76,y+314,cllightblue);
setpencolor(clBlack);
setbrushcolor(clBlack);
circle(x+106,y+326,9);
setpencolor(clBlue);
line(x+111,y+315,x+111,y+338);
FloodFill(x+112,y+328,clyellow);

end;
var x,y:integer;
begin
x:=1;
y:=windowheight div 2-40;
lockdrawing;
repeat
clearwindow;
avto(x,y);
sleep(50);
x:=x+8;
redraw
until x>=windowwidth--40;
end.

👇
Ответ:
sok2710
sok2710
01.02.2022

здесь я бес Объяснение:

4,7(34 оценок)
Открыть все ответы
Ответ:
гений248
гений248
01.02.2022

1) Минимальное основание = 10

2) Минимальное основание = 5

3) Минимальное основание = 8

Объяснение:

Система счисления записи чисел с цифр;

Цифры - специальные знаки или символы для записи чисел;

Алфавит - набор цифр, используемые в системе счисления;

Основание - количество цифр в алфавите.

Алфавит каждой системы счисления начинается с нуля:

2-ая (основание) система счисления: 0, 1; (содержит две цифры)

3-ая (основание) система счисления: 0, 1, 2; (содержит три цифры)

4-ая (основание) система счисления: 0, 1, 2, 3; (содержит четыре цифры)

5-ая (основание) система счисления: 0, 1, 2, 3, 4; (содержит пять цифр)

6-ая (основание) система счисления: 0, 1, 2, 3, 4, 5; (содержит шесть цифр)

7-ая (основание) система счисления: 0, 1, 2, 3, 4, 5, 6; (содержит семь цифр)

8-ая (основание) система счисления: 0, 1, 2, 3, 4, 5, 6, 7; (содержит восемь цифр)

9-ая (основание) система счисления: 0, 1, 2, 3, 4, 5, 6, 7, 8; (содержит девять цифр)

10-ая (основание) система счисления: 0, 1, 2, 3, 4, 5, 6, 7, 8, 9; (содержит десять цифр)

1)

9, 122, 1100, 14

Находим наибольшие цифры в каждом числе

9, 122, 1100, 14

Находим наибольшую цифру среди всех чисел

9, 2, 1, 4

Наибольшая цифра = 9 ⇒ минимальное основание = 10

2)

100, 112, 1004, 4444

Находим наибольшие цифры в каждом числе

100, 112, 1004, 4444

Находим наибольшую цифру среди всех чисел

1, 2, 4

Наибольшая цифра = 4 ⇒ минимальное основание = 5

3)

11, 7, 12, 222, 102

Находим наибольшие цифры в каждом числе

11, 7, 12, 222, 102

Находим наибольшую цифру среди всех чисел

1, 7, 2

Наибольшая цифра = 7 ⇒ минимальное основание = 8

4,7(72 оценок)
Ответ:
Okama
Okama
01.02.2022

#include <iostream>

using namespace std;

int main()

{

   int arr[5];

   cout << "Введите в одной строке элементы массива(5 целых чисел) и нажмите <Enter>." << endl;

   for (int i = 0; i < 5; i++)

   {

       cin >> arr[i];

   }

   int min = arr[0];

   for (int i = 1; i < 5; i++)

   {

       if (min > arr[i])

       {

           min = arr[i];

       }

   }

   cout << "Минимальный элемент массива: " << min;

}

Объяснение:

#include <iostream> // Библиотека ввода - вывода

using namespace std; // Пространство имён

int main()

{

   int arr[5];  // Создание целочисленного массива с размером 5

   cout << "Введите в одной строке элементы массива(5 целых чисел) и нажмите <Enter>." << endl; // Вывод сообщения в консоль + перенос на следующую строку

   for (int i = 0; i < 5; i++)  // Идём по массиву

   {

       cin >> arr[i]; // Вводим элементы массива с клавиатуры

   }

   int min = arr[0];  // Возьмем, что минимальный элемент равен первому элементу массива

   for (int i = 1; i < 5; i++)  // Идём по массиву

   {

       if (min > arr[i])  // Если значение переменной min > значения элемента массива с индексом i

       {

           min = arr[i]; // Переменная min =  значению элемента массива с индексом i

       }

   }

   cout << "Минимальный элемент массива: " << min; // Вывод ответа

}

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