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

Попробуйте написать программу в python. мне нужен ответ в течение часа. эта непростая. кто решит, буду !

Показать ответ
Ответ:
kettyperry16
kettyperry16
21.03.2021 03:03

string chisla = "";

           int max = 0;

           Console.Write("Введите три числа через пробел: ");

           chisla = Console.ReadLine();

           int[] mas = new int[3];

           for (int i = 0; i < mas.Length; i++)

           {

               mas[i] = Convert.ToInt32(chisla.Split(' ')[i]);

           }

           for (int i = 0; i < mas.Length; i++)

           {

               if (mas[i] > max)

               {

                   max = mas[i];

               }

           }

           Console.WriteLine();

           Console.Write("Наибольшее число = {0}", max);

           

           Console.ReadKey();

Объяснение:

Язык не указан, написано на C#.

0,0(0 оценок)
Ответ:
Verabogomaz
Verabogomaz
06.09.2022 06:39
1.
var
 n,i: integer;
 B1: array [1..30] of real;
begin
 writeln('Введите N: ');
 read(n);
 writeln('Введите ',n,' элементов: ');
 for i:= 1 to n do
  begin
  readln(B1[i]);
  if i mod 2 = 0 then B1[i]:=B1[i]/2;
  if i mod 2 <> 0 then B1[i]:=n;
  end;
 writeln('Массив: ');
 for i:= 1 to n do writeln(B1[i])
end.

2.
var
 sum,c1,c2,i: integer;
 T: array [1..7] of integer;
begin
 writeln('Введите температуру за 7 дней: ');
 for i:= 1 to 7 do
  begin
  readln(T[i]);
  sum:=sum+T[i];
  end;
 writeln('Средняя температура: ',sum/7);
 for i:= 1 to 7 do
  begin
  if T[i] > sum/7 then inc(c1);
  if T[i] < sum/7 then inc(c2);
  end;
 writeln('Кол-во дней с температурой выше средней: ',c1,'; ниже средней: ',c2);
end.

3.
var
 x,j,max,c,sum,i: integer;
 BC: array [1..30] of integer;
begin
 randomize;
 writeln('Массив: ');
 for i:= 1 to 30 do
  begin
  BC[i]:=random(51);
  write(BC[i]:4);
  if BC[i] mod 2 = 0 then inc(c);
  if i mod 2 = 0 then sum:=sum+BC[i];
  end;
 writeln;
 writeln('Кол-во четных элементов: ',c);
 writeln('Сумма элементов с четными индексами: ',sum);
 max:=BC[1];
 for i:= 1 to 30 do
  if BC[i] > max then max:=BC[i];
 writeln('Результат: ');
 for i:= 1 to 30 do
  begin
  if BC[i] = i then BC[i]:=max;
  writeln(BC[i]);
  end;
 for i := 30 downto 2 do
  for j := 2 to i do
  if BC[j] > BC[j - 1] then
   begin
    x := BC[j];
    BC[j] := BC[j - 1];
    BC[j - 1] := x;
   end;
  writeln('По убыванию: ');
 for i:= 1 to 30 do write(BC[i]:4);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота