Есть ответ 👍

Какая из ссылок при копировании в другую ячейку автоматически изменится? *

285
470
Посмотреть ответы 1

Ответы на вопрос:


1)  program n1;   var n,i: integer;   t: array[1..100] of real;   a,b: real;   begin  readln(n);   readln(a);   readln(b);   for i: =1 to n do  begin  t[i]: =(b-a)/n;   write(t[i],'   ');   end;   end.2)  program n1;   var a: array[1..100] of integer;   n,i: integer;   k: real;   begin  read(n);   k: =0;   for i: =1 to n do  read(a[i]);   for i: =1 to n do  if a[i] mod 2 < > 0 then  k: =k+1;   writeln;   writeln('кол-во нечет. чисел равно ',k,'');   end.6)  program n1;   var a: array[1..100] of real;   i,n: integer;   s,sr: real;   begin  read(n);   for i: =1 to n do  read(a[i]);   s: =0;   sr: =0;   for i: =1 to n do  s: =s+a[i];   sr: =s/n;   writeln('сред. арифметическое равно ',sr,'');   end.7)    program n1;   var a: array[1..100] of real;   i,n: integer;   min,max: real;   begin  read(n);   for i: =1 to n do read(a[i]);   min: =a[1];   for i: =2 to n do  if a[i]< min then  min: =a[i];   max: =a[1];   for i: =2 to n do  if a[i]> max then  max: =a[i];   writeln('максимальный элемент равен ',max,'');   writeln('минимальный элемент равен ',min,'');   end.8)  program n1;   var a: array[1..100] of real;   i,n: integer;   min,max,nom1,nom2: real;   begin  read(n);   for i: =1 to n do  read(a[i]);   min: =a[1];   nom1: =1;   for i: =2 to n do  if a[i]< min then  begin  min: =a[i];   nom1: =i;   end;   max: =a[1];   nom2: =1;   for i: =2 to n do  if a[i]> max then  begin  max: =a[i];   nom2: =i;   end;   writeln('максимальный элемент равен ',max,', его номер ',nom2,'');   writeln('минимальный элемент равен ',min,', его номер ',nom1,'');   end. 9)  program n1;   var a: array[1..100] of real;   i,n: integer;   min,max,s,sr: real;   begin  read(n);   randomize;   for i: =1 to n do  begin  a[i]: =random(100)+1;   write(a[i],'   ');   end;   writeln;   s: =0;   sr: =0;   for i: =1 to n do  s: =s+a[i];   sr: =s/n;   writeln('ср. арифм. = ',sr,'');   min: =a[1];   for i: =2 to n do  if a[i]< min then  min: =a[i];   max: =a[1];   for i: =2 to n do  if a[i]> max then  max: =a[i];   writeln('максимальный элемент равен ',max,'');   writeln('минимальный элемент равен ',min,'');   end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS