сервис вопросов и ответовдано натуральное число n. Вычислить у=1*3*5...*(2n-1). Составить программу на языке Паскаль.
10-11 класс|
|
Tema5885
21 февр. 2014 г., 6:50:40 (10 лет назад)
апельсинка123321
21 февр. 2014 г., 7:24:21 (10 лет назад)
Program n1;
Uses CRT;
Var i,n,m: integer;
begin
ClrScr;
writeln('Vvedite n');
readln(n);
i:=1; m:=1;
while i<2*n-1 do
begin
i:= i+2;
m:= m*i;
end;
writeln(m);
readln
end.
Ответить
Другие вопросы из категории
Помогите, пожалуйста. Нужно срочно..
Три свидетеля падения метеорита сообщили сведения траектории падения. Один утверждал, что наблюдал падение красного метеорита в лесной массив, Второй - чёрный метеорит упал в озеро, а Третий – метеорит был точно не красный, и по все вероятности, что упал в болото. Когда удалось отыскать метеорит, выяснилось, что каждый из свидетелей определил правильно лишь один из параметров падения, а в другом ошибся. Куда упал метеорит и какого был цвет?
1)
Метеорит красного цвета
2)
Лес
3)
Метеорит черного цвета
4)
Озеро
5)
Болото
Данные
объемом 80 Мбайт передаются из пункта А в пункт Б по каналу связи,
обеспечивающему скорость передачи данных 223 бит в секунду, а затем
из пункта Б в пункт В по каналу связи, обеспечивающему скорость передачи данных
225 бит в секунду. Задержка в пункте Б (время между окончанием
приема данных из пункта А и началом передачи в пункт В) составляет 15 секунд.
Сколько времени (в секундах) прошло с момента начала передачи данных из пункта
А до их полного получения в пункте В? Напишите пожалуйста решение !
Помогитее решить на Turbo Pascal,пожалуйстаа
Дан
массив целых чисел, состоящий из 10 элементов. Заполнить его с клавиатуры.
Найти:
−
сумму элементов, имеющих нечетное
значение;
Читайте также
1.Дано натуральное число:
a) найти произведение цифр числа б) верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)
2. Найти все трехзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.
3.Из данного натурального числа удалить все цифры А (а вводятся с клавиатуры).
Написать программы в паскале и желательно блок-схему, но можно и без нее.
Помогите пожалуйста)
1.дано натурально четырехзначное число. определить цифры этого числа (K,L.M.N) и выяснить можно ли построить ромб со сторонами K,L.M.N.в паскале АВС.
2.дано натурально число N вычислить куб суммы этого числа
Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
1)Вычислить значения функции y=4*x^3-2*x^2+5 для x, изменяющегося от -3 до 1 с шагом 0,1 на языке ПАСКАЛЬ!!СРОЧНОО ЗАВТРА ЭКЗАМЕН РЕБЯЯТКИ!
2)Найти количество всех нечетных чисел на интервале от 11 до 20
3)Найти сумму целых положительных четных чисел на интервале от 1 до 100
4)Найти сумму ряда,общий член которого равен А(х)=1/(3*N-2)*(3*N+1)
5)Дано произвольное число n≤100.Определить количество цифр в числе
ОЧЕНЬ НУЖНО!!НА ЯЗЫКЕ ПАСКАЛЬ!ВЫРУЧАЙТЕ!
ДАМ 22 ПУНКТА СРОЧНО
СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ
данны два числа a и b.составить программу для вычисления среднего арифметического кубоы этих чисел
Вы находитесь на странице вопроса "дано натуральное число n. Вычислить у=1*3*5...*(2n-1). Составить программу на языке Паскаль.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.