Дано натуральное число n (где n больше или равно нулю). Вычислить: z=2*5*8...*(3n-1). Нужно написать программу в Паскале вида program-var-begin-writeln-write-read-end и т.д. и т.п.
Дано натуральное число n (где n больше или равно нулю). Вычислить: z=2*5*8...*(3n-1). Нужно написать программу в Паскале вида program-var-begin-writeln-write-read-end и т.д. и т.п.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program CalculateZ;
var
n, i: integer;
z: integer;
begin
write′Enteranaturalnumbern:′'Enter a natural number n: '′Enteranaturalnumbern:′;
readlnnnn;
z := 1;
for i := 1 to n do
begin
z := z 3</em>i−13 </em> i - 13</em>i−1;
end;
writeln′Theresultis:′,z'The result is: ', z′Theresultis:′,z;
end.