profile
Опубликовано 5 лет назад по предмету Информатика от Аккаунт удален

Срочно.
Найти произведение квадратов нечётных чисел от 1 до 99

  1. Ответ
    Ответ дан HumphreyVanVeiden

    Программа на Паскале прилагается.

  2. Ответ
    Ответ дан contrlc

    //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.

Самые новые вопросы