Ragapomol
6 год назад
П О М О Г И Т Е, П О Ж А Л У Й С Т А!1) С помощью датчика случайных чисел получить 15 вещественных чисел n (38<n<39).2) С помощью датчика случайных чисел получить 20 целых чисел на диапозоне [0..5]. Вывести саму эту последовательность ивсе её нечетные элементы.
ОТВЕТЫ
Галина
Oct 24, 2020
1)
begin
var a:=ArrRandomReal(15,38,39);
a.Println;
end.
2)
begin
var a := ArrRandom(20, 0, 5);
Writeln('Последовательность ');
a.Println;
Writeln('Нечетные ');
a.Where(x -> odd(x)).Println;
end.
begin
var a:=ArrRandomReal(15,38,39);
a.Println;
end.
2)
begin
var a := ArrRandom(20, 0, 5);
Writeln('Последовательность ');
a.Println;
Writeln('Нечетные ');
a.Where(x -> odd(x)).Println;
end.
801
Смежные вопросы:
