Решение в прикрепленном файле.
Ввод - вывод программы
n = 10
<span>массив а:
</span><span>-11 -35 18 -16 54 19 -48 20 16 103
</span><span>массив b:
</span><span>18 54 19 20 16 103 -11 -35 -16 -48
</span><span>
</span>
#include <iostream>
int main(){ int a, max, num; std::cin>>num; while (num) { num--; std::cin>>a; if ((a%5 == 0)&&(a%7 != 0)&&(a > max)) max = a; } std::cout<<a;}
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrInteger(10);
var s:=a.Where(t->t>0); // последовательность положительных
Writeln('Положительных: ',s.Count);
Writeln('Максимальный: ',a.Max);
Writeln('Сумма положительных: ',s.Sum);
Writeln('Ср.арифм. положительных: ',s.Average);
a.Transform(t->t.IsEven?2*t:t+1); a.Println
end.
<u>Пример</u>
-6 28 31 83 -25 -17 8 0 11 13
Положительных: 6
Максимальный: 83
Сумма положительных: 174
Ср.арифм. положительных: 29
-12 56 32 84 -24 -16 16 0 12 14
<span>Устро́йства вво́да — периферийное оборудование, предназначенное для ввода данных или сигналов в компьютер или в другое электронное устройство во время его работы
</span>Устройства вывода<span> - это </span>устройства<span>, которые переводят </span>информацию<span> с машинного языка в формы, доступные для человеческого восприятия. Различают алфавитно-цифровые и графические мониторы, а также монохромные мониторы и мониторы цветного изображения - активно-матричные и пассивно-матричные жкм.
</span>
<span>Жесткий диск, или винчестер, — основные устройства хранения информации в компьютере. Современные жесткие диски отличаются высокими показателями емкости (сотни н даже тысячи гигабайт), скорости и надежности, а также не очень высокой стоимостью.
</span>оперативной памяти находится и место для хранения промежуточных данных, формируемых в процессе обработки информации<span>. Таким образом, процессор как получает данные из оперативной памяти, так и записывает обработанные данные в оперативную память.</span><span>
</span>
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
Begin
var a:= ArrRandom(15,20,84);a.PrintLn;
Writeln(a.Where(t -> (t.isOdd)and(t mod 3 = 0)and(t mod 10 <> 0)).Count);
end.
Пример:
64 64 76 31 21 81 53 30 58 38 66 69 57 65 41
4