using System;
using System.Linq;
namespace Prog
{
public class Program
{
public static void Main(string[] args)
{
Random rnd = new Random();
int len = rnd.Next(5,30);
int[] A = new int[len];
for (int i = 0; i < len; i++)
A[i] = rnd.Next(-50, 50);
Console.WriteLine("{0}", string.Join(" ", A));
var B = Array.FindAll(A, i => i >= A[Array.IndexOf(A, A.Max())-1]);
foreach (int i in B)
Console.Write(i+" ");
}
}
}
var a1: array[-1000..50] of integer; только одно правильное нашла.
const m1 = 20; m2 = m1*100;
var a6: array[m1..m2] of -200..200; вместо -200..200 надо было тип указать.
var a2: array[200..-111] of real; сначала отрицательное число.
const n: byte = 0;
var a5: array[-1000..n] of word; не надо указывать тип константы (byte).
var a9: array[0.0..20000.0] of byte; вот насчет этого не уверена, но мне кажется, что тут не надо дробную часть, потому что byte - целый тип.
type mass = array[1..100] of char; пишут не type, a var.
var a7: array[0..99] of mass; насколько мне известно, типа mass не существует.
880/8=11байт
65+11=76 байт