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

Составить блок схему по фрагменту кода (круговой фрактал)

public void d(double x, double y, int size, graphics g) {
int n = 6, c = 3, rad = 0, den = 0;

if (size > 0) {
rad = math.round(size/c);
den = math.round(size*(c-1)/c);
d(x, y, rad, g);
for(int i = 0; i < n; i++){
d(x - math.round(den*math.sin(2*math.pi/n* y + math.round(den*math.cos(2*math.pi/n* rad, g);
}
g.drawoval((int)x-size, (int)y-size, 2*size, 2*size);
}
}

Показать ответ
Ответ:
gvg1971
gvg1971
11.02.2022 16:12

Какие качества нужны, чтобы стать хорошим специалистом?

Трудолюбие  

ответственность  

Умение работать в команде  

Стремление к личностному росту, развитию профессиональных качеств .

Лояльность

Как ты понимаешь высказывание: «Самая трудная профессия - быть человеком»?

Действительно, самой трудной профессией является быть человеком. В нашей жизни всё зависит от самого человека, что он будет считать смыслом своей жизни, к чему будет стремиться, на что будет тратить свои силы. Трудно жить среди людей, но надо постоянно стремиться стать лучше. Нужно всегда быть человеком, думать о других, стараться творить добро, приносить людям пользу. Человеком надо быть всегда и везде, каждую минуту, без выходных и праздников. Мы должны пробовать облегчить жизнь другим людям, поддерживать и любить своих близких, в том, чтобы жить ради других людей и заключается предназначение каждого человека, человек должен быть человечным. Надо стараться быть добрее и гуманнее, справедливее по отношению к другим людям, хотя это и является самой трудной профессией - быть человеком.

0,0(0 оценок)
Ответ:
КучеренкоИнна
КучеренкоИнна
22.12.2022 20:00

pascal

Объяснение:

procedure sortmas(a: array of integer);

var i, j, min, ind: integer;

begin

 for i := 0 to Length(a) - 2 do

 begin

   min := a[i]; ind := i;

   for j := i + 1 to Length(a) - 1 do

     if a[j] < min then

     begin

       min := a[j]; ind := j;

     end;

   a[ind] := a[i]; a[i] := min;

 end;

end;

var a: array of integer;

   n , i: integer;

begin

 WriteLn('Введите размер массива: '); Read(n);

 SetLength(a, n);

 Randomize;

 WriteLn('Содержимое массива:');

 for i := 0 to Length(a) - 1 do

 begin

   a[i] := random(100);

   Write(a[i], ', ');

 end;

 WriteLn;

 sortmas(a);

 WriteLn('Три минимальных элемента: ', a[0], ', ', a[1], ', ', a[2], ', ');

end.

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