Регистрация
MRSAVVA
09.08.2020 22:13
Информатика
Есть ответ 👍

(pascal abc net)найти сумму максимального и минимального из 12 введенных чисел. вывести сами значения и их индексы.

292
335
Посмотреть ответы 2

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

ProKingcool
ProKingcool
4,4(38 оценок)
Раз надо найти индексы, значит это массив //pascal const n = 12; var a: array[1..n] of real; min,max: real; imin,imax,i: integer; begin max: =-999999; min: =999999;   for i: =1 to n do begin       readln(a[i]);       if a[i]< min then begin         min: =a[i]; imin: =i;       if a[i]> max then begin         max: =a[i]; imax: =i;   end; writeln ('максимальный ',max,'индекс',imax); writeln ('минимальный',min,'индекс',imin); writeln ('сумма', max+min); end.
aknurrakhmanber
aknurrakhmanber
4,7(86 оценок)

Код:

using System;

namespace WordsCounter

{

   class Bishop

   {

       private int x, y;

       public Bishop(int x, int y)

       {

           this.x = x;

           this.y = y;

       }

       public bool CanIAttackIt(int x, int y)

       {

           return Math.Abs(x - y) == Math.Abs(this.x - this.y);

       }

   }

   class Program

   {

       static void Main(string[] args)

       {

           var x0 = int.Parse(Console.ReadLine()!);

           var y0 = int.Parse(Console.ReadLine()!);

           var x = int.Parse(Console.ReadLine()!);

           var y = int.Parse(Console.ReadLine()!);

           Console.WriteLine((new Bishop(x0, y0)).CanIAttackIt(x, y));

       }

   }

}


На шахматной доске в клетке с координатами x1, y1 находится слон. Определить, сможет ли он убить фиг
На шахматной доске в клетке с координатами x1, y1 находится слон. Определить, сможет ли он убить фиг
На шахматной доске в клетке с координатами x1, y1 находится слон. Определить, сможет ли он убить фиг

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