Код программы в Delphi для задачи вычислить произведение первых ...
Код программы в Delphi для задачи вычислить произведение первых восьми членов арифметической прогрессии с первым членом равным 9 и разницей 4.
Есть ответ
17.12.2022
496
Ответ
var p: real; d, a1, i : Integer;begin a1 := 9; d := 4; p := 1;
for i := 1 to 8 do p := p * (a1 + (i - 1) * d); Write( p:0:0 );end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022
