Let array = [1, 2, 8, 4, 12, 35, 2, 5, 6, 21];
let odd = [Int];
let even = [Int];
for (number in array) {
if ((number mod 2) == 0) {
odd.append(number);
} else {
even.append(number);
}
}
println('Четные числа: \(odd)');
println('Нечетные числа: \(even)');
Вот такое соответствие здесь:
1-А
2-Г
3-В
4-Б
5-Д
Var x:real;
begin
x := -4;
while x <= 4 do begin
writeln('x=',x : 2 : 2,' y=', abs(x-2)+abs(x+1) : 2 : 2);
x := x + 0.5;
end;
readln; //задержка ввода
end.
Вот, они все не меньше 50 и чётные
74, 86, 122