Регистрация
Kolyakek
04.10.2020 18:13
Информатика
Есть ответ 👍

Код программы в delphi для вычислить произведение первых восьми членов арифметической прогрессии с первым членом равным 9 и разницей 4.

280
488
Посмотреть ответы 2

Ответы на вопрос:

Yurianvinokurov
Yurianvinokurov
4,8(98 оценок)

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.

 

anyalike
anyalike
4,5(4 оценок)

2) и 1)

Объяснение:

Популярно: Информатика