Главное свойство любой системы – возникновение системного эффекта. Заключается оно в том, что при объединении элементов в систему у системы появляются новые качества, которыми не обладал ни один из элементов в отдельности.
<span>В качестве примера системы рассмотрим самолет. Главное его свойство – способность к полету. Ни одна из составляющих его частей в отдельности (крылья, двигатели и т.д.) этим свойством не обладает, а собранные вместе строго определенным способом, они такую возможность обеспечивают. Вместе с тем, если убрать из системы «самолет» какой-нибудь элемент (например, крыло), то не только это крыло, но и весь самолет потеряет способность летать.
</span>
using System;
using System.Collections.Generic;
namespace App {
internal class Program {
private static void Main() {
Console.Write("Сколько элементов будем вводить? n = ");
var n = Convert.ToInt32(Console.ReadLine());
var a = new List<int>();
for (var i = 0; i < n; i++) {
Console.Write("Элемент номер {0} = ", i);
a.Add(Convert.ToInt32(Console.ReadLine()));
}
Console.WriteLine("Среднеарифметическое = {0}", Average(a));
Console.ReadKey();
}
public static double Average(List<int> a) {
var sum = 0.0;
foreach (var t in a) {
sum += t;
}
return sum / a.Count;
}
}
}
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString('Введите строку:');
var n:=s.Matches('[A-Za-zА-Яа-яёЁ]').Count;
var m:=s.Length-n;
if m>n then Writeln('В строке букв меньше иных символов')
else
if m<n then Writeln('В строке букв больше иных символов')
else Writeln('В строке поровну букв и иных символов')
end.
<u>Примеры</u>
Введите строку: Это 12+32/16t/7+3.1415 тест
В строке букв меньше иных символов
Введите строку: И это 14+7 равно 21 тоже тест
В строке букв больше иных символов