Напиши те программу вычисления в массиве из n элементов, заданных датчиком случай?
Напиши те программу вычисления в массиве из n элементов, заданных датчиком случай??ых чисел из промежутка от -13 до 25, количества четных элементов.
Ответ(ы) на вопрос:
Гость
Begin
var a := ArrRandom (ReadInteger ('n='), -13,25).Where (x-> x mod 2=0).Count;
write (a);
end.
Не нашли ответ?
Похожие вопросы