datskivvera
14.04.2023 15:01

Найдите корни уравнения: 5|х|-3|х|-6=2|х надо

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
nastprin
11.05.2023 02:27
Je suis en 3A classe. Dans notre classe de tout un chacun de comprendre et d'aider dans le pétrin. Les garçons intercède pour les filles, et les filles ne railleries de leurs camarades de classe. Notre classe est toujours à-dire engagés dans les différentes compétitions, et bien que nous ne gagnons toujours, mais toujours joyeux de nos progrès.
Nous avons un chic cabinet. Il ya beaucoup de couleurs! Nous avec ses camarades de classe pour eux la prise en charge. Pourtant, il ya un grand tableau, sur le sujet que nous traitons, nous écrivons des offres et dessiner. Ensuite, après les cours ordinaires enlèvent la classe. Balayer, arroser les fleurs, et tous les aident. Parce que notre classe est très sympa! En effet, c'est le plus important!
0,0(0 оценок)
Ответ:
kareta2004
12.05.2020 22:44
Ну и сюда скину. Вдруг не заметишь)
Эта автоматически тебе всё сделает.
Var i, n, max : Integer;
     a : array [1..30] of Integer;
 begin
    for i := 1 to 30 do
 begin
      Write('a[', i, ']='); 
      a[i]:=i+1;
      if max<a[i] then max:=a[i];
      writeln(a[i]);
end;
  writeln('Максимальный элемент равен: ',max);
end.

Если нужно будет ввести последовательность с клавиатуры, то вот:
Var i, n, max : Integer;
     a : array [1..30] of Integer;
 begin
    for i := 1 to 30 do
 begin
      Write('a[', i, ']='); 
      ReadLn (a[i]);
      if max<a[i] then max:=a[i];
end;
  writeln('Максимальный элемент равен: ',max);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота