Дан массив, состоящий из целых чисел. Напишите программу, которая выводит те элементы массива, которые являются чётными числами.
Входные данные
Сначала задано число N — количество элементов в массиве (1N100). Далее через пробел записаны N чисел — элементы массива. Массив состоит из целых чисел.
PASCAAAALLLL
Даю 35 баллов
Ответы
Ответ дал:
1
Ответ:
var n,i:integer;
a:array [1..100] of integer;
begin
readln(n);
for i := 1 to n do read(a[i]);
writeln;
for i := 1 to n do if a[i] mod 2 = 0 then write(a[i]:4)
end.
Ответ дал:
0
===== PascalABC.NET =====
begin
var n := ReadInteger;
var a := ReadArrInteger(n);
a.Where(p -> p.IsEven).Println
end.
Приложения:
BobbyFresnel:
Ограничение n <= 100 снято. N - любое положительное, не превышающее примерно 2.14 миллиарда.
Вас заинтересует
2 месяца назад
2 месяца назад
4 месяца назад
4 месяца назад
1 год назад
7 лет назад