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

Составить алгоритм для алёши поповича при выборе дороги в 3 направлениях.прямо пойдёт смерть найдёт в право пойдёт без коня останется в левом пойдёт богатым будет.

👇
Ответ:
Саня11671873478
Саня11671873478
24.05.2021

пока есть дорога:

идти

если есть развилка:

идти направо

4,7(71 оценок)
Открыть все ответы
Ответ:
zukhra1234
zukhra1234
24.05.2021
Август Кекуле
Август Кекуле - немецкий химик мирового
значения, открыл химическую формулу
бензола. Его избрали почетным членом многие
академии мира, с его мнением считались не
только ученые, но и промышленники.
Просмотров: 9437
Адольф фон Байер
Адольф фон Байер - немецкий химик,
анализируя обратный процесс, получение
индиго путем окисления изатина, впервые
сумел синтезировать индиго, сделав, таким
образом, возможным его промышленное
производство.
Просмотров: 6398
Александр Михайлович Бутлеров
Александр Михайлович Бутлеров - русский
химик, открытая им теория химического
строения служит теперь принципиальной
основой всех без исключения современных
разделов синтетической химии.
Просмотров: 11279
Альфред Вернер
Альфред Вернер - немецкий химик, открыл
оптически активные неорганические изомеры -
соединения кобальта, хрома, железа. Это было
крупным успехом дальнейшего развития
неорганической химии.
Просмотров: 6849
Антуан Лоран Лавуазье
Антуан Лоран Лавуазье — французский химик,
объяснил факт горения, — целый мир явлений
окисления, происходящих всегда и всюду — в
воздухе, земле, организмах — во всей мертвой
и живой природе.
Просмотров: 8849
4,6(50 оценок)
Ответ:
sofiya13031
sofiya13031
24.05.2021
{ 1. Дан массив из n элементов, n не больше 30. отсортировать по возрастанию элементы второй половины }

const n=20;
var 
  k,x,i,j: integer;
  var a: array[1..n] of integer;
begin
  if n mod 2 =0
    then k:=(n div 2)+1    
    else k:=(n div 2)+2;
  writeln ('Исходный массив');
  for i:=1 to n do begin
    a[i]:=random(100);
    write (a[i]:3);
  end;
  writeln;
  for i:=k to n-1 do 
    for j:=i+1 to n do 
      if a[i]>a[j]
        then begin x:=a[i]; a[i]:=a[j]; a[j]:=x end;      
  writeln;
  writeln ('Измененный массив');
  for i:=1 to n do 
    write (a[i]:3);
end.

Результат:
Исходный массив
 52 49 94 71 98 80 83 94 26 59 66 74 97 59 27 32 90 97 43 37

Измененный массив
 52 49 94 71 98 80 83 94 26 59 27 32 37 43 59 66 74 90 97 97


{ Дан массив из n элементов, n не более 30, n-четное. Поменять местами первую и вторую половину }

const n=20;
var 
  k,x,i: integer;
  var a: array[1..n] of integer;
begin
  k:=(n div 2);
  writeln ('Исходный массив');
  for i:=1 to n do begin
    a[i]:=random(100);
    write (a[i]:3);
  end;
  writeln;
  for i:=1 to k do begin 
    x:=a[i]; 
    a[i]:=a[i+k]; 
    a[i+k]:=x 
  end;
  writeln;
  writeln ('Измененный массив');
  for i:=1 to n do 
    write (a[i]:3);
end.

Результат:
Исходный массив
 37  8 74 17  8 96  1 47 69 77 69 21  2 67 93 35 74 58 48 53

Измененный массив
 69 21  2 67 93 35 74 58 48 53 37  8 74 17  8 96  1 47 69 77
4,6(7 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ