Найти значение выражения 2*4*6*8...*2n, где n вводится пользователем с помощью цикла for.(программа Паскаль)
5-9 класс
|
Если нужно вот таже программа с поиощью repeat-until (она точно написана верно):
program E10;
var i,n: integer;
s: real;
begin
writeln('vvedite n');
readln(n);
i:=1;
s:=1;
repeat i:=i+1;
s:=i*2*s;
until
i=n;
writeln('s=', s:4:2);
readln;
end.
var i,n,l:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
l:=2*i*l;
readkey;
end.
Другие вопросы из категории
я в 9 классе можно по простому заранее спасибо
Мне нужно с помощью описания
переменных в Pascal ABC изобразить
вот этот рисунок:
несёт одна буква этого алфавита?
Сообщение, записанное буквами из 16-символьного алфавита, содержит 50 символов. Какой объём информации оно несёт?
Сколько символов содержит сообщение, записанное с помощью 16-ти символьного алфавита, если его объём составил 1/16 часть Мебибайта?
Сколько килобайтов составит сообщение из 384 символов 16-ти символьного алфавита?
Два сообщения содержат одинаковое количество символов. Количество информации в первом тексте в 1,5 раза больше, чем во втором. Сколько символов содержат алфавиты, с помощью которых записаны сообщения, если известно, что число символов в каждом алфавите не превышает 10 и на каждый символ приходится целое число битов?
Читайте также
Линейна структура:
1) Найти значение выражения y=ax^2+bx+c
2) Вычислить площади треугольника, прямоугольника, ромба.
3) Найти среднее арифметическое трёх чисел.