Написать программу, которая вводит массив из N вещественных
случайных чисел, лежащих в диапазоне от -10 до 10. Вывести на экран
полученный массив и массив, составленный только из нечётных
элементов исходного. Протестировать программу.
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var n:=ReadInteger();
var a:=ArrRandom(n,-10,10);
a.Println;
for var i:=0 to n-1 do if a[i]mod 2<>0 then print(a[i]);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
