Вфайле записаны данные о результатах сдачи экзамена. каждая строка содержит фамилию, имя и количество , разделенные пробелами: вывести в другой файл данные учеников, которые получили больше 80 . список должен быть отсортирован по убыванию . формат выходных данных: п. иванов 98 и. петров 96

// PascalABC.NET 3.2, сборка 1449 от 23.05.2017
// Внимание! Если программа не работает, обновите версию!

type
  R=(string,integer);

begin
  var a:=ReadAllLines('input.txt');
  var L:=new List<R>;
  foreach var s in a do begin
    var w:=s.ToWords.ToArray;
    if w[2]>'80' then L+=(w[1][1]+'. '+w[0],w[2].ToInteger);
    end;
  var f:=OpenWrite('output.txt');
  L.OrderByDescending(x->x[1]).ForEach(x->Writeln(f,x[0],' ',x[1]));
  f.Close
end.

Объяснение:

#1

public static void Main(string[] args)

       {

           double r = 1;

           Console.WriteLine("P = " + Math.PI*r*2);

           Console.WriteLine("S = " + Math.PI*r*r);

       }

#2

static void Main(string[] args)

       {

           int[] a = new int[10];

           a[0] = 1;

           a[1] = 1;

           a[2] = 2;

           a[3] = 3;

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

           {

               Console.WriteLine("a[{0}] = {1} ", i + 1, a[i]);

           }

           for (int i = 3; i < a.Length; i++)

           {

               a[i] = a[i - 1] + a[i - 3];

               Console.WriteLine("a[{0}] = {1} ", i + 1, a[i]);

           }

       }

int n = Convert.ToInt32(Console.ReadLine())

Объяснение:

Это Ввод данных. Первые две задачи выполнены хорошо. Если хочешь вводить число n , то в вызове метода убери параметры и оставь свободным.

static void Main()

{

(10,45);

ShowSequenceOfOddNumbers(5);

CreateAndShowArray();    // Вот так

}

А чтоб вводить число добавь строку "Ввода данных"

int n = Convert.ToInt32(Console.ReadLine())

Например:

tatic void CreateAndShowArray()     // Пустой параметр

{

int n = Convert.ToInt32(Console.ReadLine())

long p = 1;

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

{

a[i] = new Random().Next(0, 100);

Console.Write(a[i] + " ");

p *= a[i];

}