1.даны 8 различных чисел, составьте алгоритм умножающий только положительные из них. 2.в классе 18 учеников. - id2062265620210207 от Marusya2099 07.02.2021 03:18

Question

Информатика: 1.даны 8 различных чисел, составьте алгоритм умножающий только положительные из них. 2.в классе 18 учеников. Составь алгоритм определения количества учеников с оценкой хорошо по математике. 3.дано 12 различных чисел, найдите сумму отрицательных и нечетных чисел

Marusya2099 · Accepted Answer

Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10

// PascalABC.NET 3.0,сборка 1076
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=ArrRandom(n,-50,50);
Writeln('Исходная последовательность');
a.Println;
Writeln('Сумма элементов: ',a.Sum);
Write('Кол-во четных, кратных пяти: ');
Writeln(a.Where(x-> x mod 10 = 0).Count)
end.

Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1

MOGZ ответил