Предмет: Информатика,
автор: Аноним
Срочно.
Найти произведение квадратов нечётных чисел от 1 до 99
Ответы
Автор ответа:
0
Программа на Паскале прилагается.
Приложения:

Автор ответа:
0
//PascalABC.NET
begin
var product: int64;
product := 1;
var seq := range(1, 99).Where(x -> x mod 2 <> 0).Select(x -> x * x);
foreach var x in seq do
product := product * x;
write(product);
end.
Похожие вопросы
Предмет: Математика,
автор: aseldostanova8526
Предмет: История,
автор: zannakabduseva
Предмет: Биология,
автор: DedMaksim0Shrek
Предмет: Математика,
автор: islamzadenigar
Предмет: Математика,
автор: maska251