mashakesea03
05.03.2021 20:18

С цикла while найти сумму ряда с точностью p = 10^-3 P.s. Язык программирования не важен, но предпочтителен C#


С цикла while найти сумму ряда с точностью p = 10^-3 P.s. Язык программирования не важен, но предпоч

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Linkin251
10.09.2020 15:05

Задача 1:

using System;

using System.Linq;

namespace ConsoleApp1

{

   internal class Program

   {

       private static void Main(string[] args)

       {

           Console.Write("Enter n: ");

           int n = int.Parse(Console.ReadLine());

           var x = new int[n];

           var rand = new Random();

           for (int i = 0; i < n; i++)

           {

               x[i] = rand.Next(-100, 100);

               Console.WriteLine($"x[{i}] = {x[i]}");

           }

           int max = x.Max();

           int index = Array.IndexOf(x, max);

           for (int i = 0; i < index; i++)

           {

               if (x[i] < 0)

                   x[i] = 0;

           }

           Console.WriteLine("\nResult:");

           for (int i = 0; i < n; i++)

               Console.WriteLine($"x[{i}] = {x[i]}");

       }

   }

}

Задача 2:

using System;

using System.Linq;

namespace ConsoleApp2

{

   internal class Program

   {

       private static void Main(string[] args)

       {

           Console.Write("Enter n: ");

           int n = int.Parse(Console.ReadLine());

           var a = new int[n];

           var rand = new Random();

           for (int i = 0; i < n; i++)

           {

               a[i] = rand.Next(-100, 100);

               Console.WriteLine($"x[{i}] = {a[i]}");

           }

           int[] positiveItems = a.Where(t => t > 0).ToArray();

           if (positiveItems.Length == 0)

           {

               Console.WriteLine("No positive numbers");

               return;

           }

           int sum = positiveItems.Sum();

           int product = positiveItems.Aggregate((x, y) => x * y);

           double arithmeticMean = sum / (double)positiveItems.Length;

           double geometricMean = Math.Pow(product, 1 / (double)positiveItems.Length);

           Console.WriteLine($"\nArithmetic mean: {arithmeticMean}");

           Console.WriteLine($"Geometric mean: {geometricMean}");

       }

   }

}


1) В заданном массиве Х(N) замените нулями все отрицательные компоненты, непосредственно предшествую
1) В заданном массиве Х(N) замените нулями все отрицательные компоненты, непосредственно предшествую
0,0(0 оценок)
Ответ:
dis8
17.11.2022 01:57
//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ma:array[1..n,1..n] of integer;
 i,j:integer;
begin
 writeln('Matrix reading...');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
      readln(ma[i,j]);
  end;
 writeln('First matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     begin
      write(ma[i,j]:4);
      if (ma[i,j]<-8) or (ma[i,j]>6) then ma[i,j]:=sqr(ma[i,j]);
     end;
  end;
 writeln;
 writeln('Final matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     write(ma[i,j]:4);
  end;
end.

Пример ввода:
1
2
3
4
5

6
7
8
9
1

2
3
4
5
6

7
8
9
1
2

3
4
5
6
7
Пример вывода:
First matrix:
   1   2   3   4   5
   6   7   8   9   1
   2   3   4   5   6
   7   8   9   1   2
   3   4   5   6   7
Final matrix:
   1   2   3   4   5
   6  49  64  81   1
   2   3   4   5   6
  49  64  81   1   2
   3   4   5   6  49
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота