Предмет: Информатика,
автор: Никита105501
Пожалуйста!!!!! Паскаль
Дан массив из N элементов. Определить количество элементов, которые являются нечетными числами.
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Нечетных: ',ArrRandom(ReadInteger('n='),-99,99).Println
.Where(x->x.IsOdd).Count)
end.
Пример
n= 15
-91 88 -55 -11 -12 -84 53 86 27 -18 -57 -61 13 -94 -48
Нечетных: 8
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Нечетных: ',ArrRandom(ReadInteger('n='),-99,99).Println
.Where(x->x.IsOdd).Count)
end.
Пример
n= 15
-91 88 -55 -11 -12 -84 53 86 27 -18 -57 -61 13 -94 -48
Нечетных: 8
Автор ответа:
0
Во люди пошли! одну строку ленятся написать!!
Автор ответа:
0
Ага, а когда видят одну, просят вместо нее написать десять.
Похожие вопросы
Предмет: Математика,
автор: sashasamokish1992
Предмет: Другие предметы,
автор: aidmuk10
Предмет: Физика,
автор: tigrenok9285
Предмет: Обществознание,
автор: lero4ka2000ler