Предмет: Информатика,
автор: zhekchan
Написать прогу на паскале. Дано натуральное число n. Вычислить y=2*4*6...(2n).
Ответы
Автор ответа:
0
Program Program1;
var
i,n,y:integer;
begin
write('Введите значение n: ');
readln(n);
i:=2;
y:=1;
while i<=2*n do
begin
y:=y*i;
inc(i,2);
end;
writeln('y=',y);
end.
Интересные вопросы
Предмет: Литература,
автор: dilganieva3
Предмет: Алгебра,
автор: Clipipaster
Предмет: Русский язык,
автор: mrrazen75740
Предмет: Алгебра,
автор: sergey1993
Предмет: Физика,
автор: Аноним