сервис вопросов и ответовДаны числа от 1 до N.Найти Р: 1/1*1/2*…*1/N
5-9 класс|
|
Малининнннннннннаа
18 дек. 2014 г., 9:32:42 (9 лет назад)
Kolya161
18 дек. 2014 г., 10:39:18 (9 лет назад)
uses Crt;
var i,n :integer; p:real;
begin
p:=1;
readln(n);
for i:=1 to n do
p:=p*(1/i);
writeln(p);
readln
end.
Irishasnezhkova
18 дек. 2014 г., 12:49:02 (9 лет назад)
Program abc;
var P:real; N,x:integer;
begin
Readln(N);
P:=1;
For x:=1 to N do
P:=P* 1/x;
writeln(P);
end.
Ответить
Другие вопросы из категории
Пожалуйста решите, буду благодарна))))) Действие компьютерного вируса состоит в том, что вместо букв «б», «в», «л», «о», «т» печатаются цифры, кроме циф
- ры 0, причём разным буквам соответствуют разные цифры. Выясните, какие цифры каким буквам соответствуют, если известно, что: 1) сумма цифр слова «бот» равна 8; 2) сумма цифр слова «вол» равна 9; 3) сумма цифр слова «болт» равна 11; 4) сумма цифр слова «лото» равна 12.
РЕШИТЕ ПОЖАЛУСТА В ПАСКАЛЕ 1)Идёт k ая секунда суток.Определить, который сейчас час( в часах минутах секундах) 2)С начала месяца прошло m минут.
Определить какое сейчас число и который сейчасчас час( в часах и минутах )
Читайте также
2) Даны числа от 5 до 78. Заменить все числа кратных 11 на квадрат этого числа.
3) Даны числа от 1 до n. Найти сумму чисел кратных 5, но не кратных 7.
Помогите пожалуйста!!!)))))
ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!! 1. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
Задание 4.Составте программу ,выводящую на экран числа от 1 до 10 , по одному числу в строке.
Задание 5.Дополните программу из задания 4 так , чтобы на экран выводились числа от 1 до 10,а также квадраты и кубы этих чисел в следующем виде:
1 1 1
2 4 8
3 9 27
... ... ...
10 100 1000
ПОМОГИТЕ ПОЖАЛУЙСТА,ЗАДАНИЕ 4 ПИСАТЬ НЕ НУЖНО !ПОСТАВЛЮ ЛУЧЩИЙ ОТВЕТ И "СПАСИБО"
1. Даны числа от 5 до 16. Необходимо вывести на экран (в столбик) удвоенное значение каждого числа.
Пример вывода ответа: 5*2 = 10
6*2 = 12 и т.д.
2) Напишите программу перевода расстояния из метром в сантиметры для значений длин от 1 до 15 метров.
(Информатика. 8 класс. Паскаль)
Помогите написать программу на паскале "Ввести число от 0 до 24 и вывести фразу «Доброе утро», «Добрый день», «Добрый вечер», «Спокойной ночи» в
зависимости от времени суток. Пример: Введите число от 0 до 24: 12 Добрый день!"
Вы находитесь на странице вопроса "Даны числа от 1 до N.Найти Р: 1/1*1/2*…*1/N", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.