<span>Программа выводящая одно число: сумму всех чисел , кратных 4 и оканчивающихся на 6.</span>
И еще после последней строчки
кон
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var names:array[1..2,1..5] of string:=
(('Саша','Женя','Таня','Лена','Вася'),
('Александр','Евгений','Татьяна','Елена','Василий'));
var name:=ReadlnString('Введите краткое имя:');
var p:=0;
for var i:=1 to 5 do
if name=names[1,i] then begin p:=i; break end;
if p>0 then Writeln(names[2,p])
else Writeln('Я вас не знаю!')
end.
<u><em>Тестовое решение</em></u>
Введите краткое имя: Лена
Елена
Главное свойство любой системы – возникновение системного эффекта. Заключается оно в том, что при объединении элементов в систему у системы появляются новые качества, которыми не обладал ни один из элементов в отдельности.
<span>В качестве примера системы рассмотрим самолет. Главное его свойство – способность к полету. Ни одна из составляющих его частей в отдельности (крылья, двигатели и т.д.) этим свойством не обладает, а собранные вместе строго определенным способом, они такую возможность обеспечивают. Вместе с тем, если убрать из системы «самолет» какой-нибудь элемент (например, крыло), то не только это крыло, но и весь самолет потеряет способность летать.
</span>
а) Серёже надо приходить в 8 часов.
б) нарицательные числа
в) 0 не делиться на 5