using System;
using System.Collections.Generic;
using System.Linq;
using static System.Console;
namespace ConsoleApp12
{
class Program
{
static void Main(string[] args)
{
var x = new List<int>();
for (int i = 0; i < 5; i++)
x.Add(int.Parse(ReadLine()));
WriteLine("imax="+(x.IndexOf(x.Max())+1).ToString()+"; imin="+(x.IndexOf(x.Min())+1).ToString());
ReadKey();
}
}
}
<span>схема отношения
векторное изображение
схема алгоритмов
функциональная схема
что то мб подойдет</span>
<span>К - количество символов в тексте,I - количество информации во всем тексте.I = K * i </span>
Современный Паскаль все сделает сам...
<em>// PascalABC.NET 3.2, сборка 1387 от 17.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var x:=ReadReal('x='); Writeln('F=',1/(x-1))
end.
<u>Примеры</u>
x= -3.5
F=-0.222222222222222
x= 1.000001
F=1000000.00008227
x= 1
F=бесконечность