Составить программу решения выражения...

@Xander-Storm · Регистрация: 04.10.2010

Author24 — интернет-сервис помощи студентам

Требуется составить программу,решающую данное выражение: 1*2+2*3*4+...+n*(n+1)...(2n).

@Puporev · 05.10.2010, 10:23

Pascal

{N+}
uses crt;
var n,i,j:byte;
    s,p:extended;
begin
clrscr;
write('n=');
readln(n);
s:=0;
for i:=1 to n do
 begin
  p:=1;
  for j:=i to 2*i do
  p:=p*j;
  s:=s+p;
 end;
write('S=',s:0:0);
readln
end.

@Dear Bear · 05.10.2010, 10:32

Puporev, а что такое тип данных extended?

@Puporev · 05.10.2010, 11:03

Из встроенной справки Паскаля.

Вещественные типы
------------------
Вещественный тип имеет набор значений, который является подмножеством
вещественных чисел, которые могут быть представлены в виде числа с плавающей
точкой и с фиксированным количеством разрядов.

Число с плавающей точкой обычно состоит из трех значений - М, B и E - так
что М x B E = N, где B - всегда 2, а М и E - интегральные значения,
находящиеся внутри диапазона вещественных чисел.

Turbo Pascal обеспечивает пять предопределенным вещественных типов. Каждый
тип имеет свой диапазон и точность:

Тип Диапазон Точность Байт
Real 2.9e-39..1.7e38 11-12 6
Single 1.5e-45..3.4e38 7-8 4
Double 5.0e-324..1.7e308 15-16 8
Extended 3.4e-4932..1.1e4932 19-20 10
Comp -9.2e18..9.2e18 19-20 8

Обратите внимание: тип Comp - 64-разрядное целое число. В нем можно хранить
только интегральные значения в диапазоне (-2 63 + 1)..(2 63 - 1).

Turbo Pascal поддерживает две модели генерации объектного кода с числами с
плавающей запятой :
- Программная поддержка чисел с плавающей запятой {$N-}
- Аппаратная (80x87) поддержка чисел с плавающей запятой {$N+}

Вы можете использовать директиву компилятора $N для переключения между двумя
моделями.

В режиме $N+, директива компилятора $E управляет, включать ли библиотеки
эмуляций 80x87 в готовую программу.

@Xander-Storm 0 / 0 / 0 Регистрация: 04.10.2010 Сообщений: 8
		1
	Составить программу решения выражения... 04.10.2010, 23:51. Показов 1494. Ответов 3 Метки нет (Все метки) Требуется составить программу,решающую данное выражение: 12+234+...+n(n+1)...(2n). 0

@Dear Bear 22 / 22 / 3 Регистрация: 28.09.2010 Сообщений: 100
	05.10.2010, 10:32	3
	Puporev, а что такое тип данных extended? 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	05.10.2010, 11:03	4
	Из встроенной справки Паскаля. Вещественные типы ------------------ Вещественный тип имеет набор значений, который является подмножеством вещественных чисел, которые могут быть представлены в виде числа с плавающей точкой и с фиксированным количеством разрядов. Число с плавающей точкой обычно состоит из трех значений - М, B и E - так что М x B E = N, где B - всегда 2, а М и E - интегральные значения, находящиеся внутри диапазона вещественных чисел. Turbo Pascal обеспечивает пять предопределенным вещественных типов. Каждый тип имеет свой диапазон и точность: Тип Диапазон Точность Байт Real 2.9e-39..1.7e38 11-12 6 Single 1.5e-45..3.4e38 7-8 4 Double 5.0e-324..1.7e308 15-16 8 Extended 3.4e-4932..1.1e4932 19-20 10 Comp -9.2e18..9.2e18 19-20 8 Обратите внимание: тип Comp - 64-разрядное целое число. В нем можно хранить только интегральные значения в диапазоне (-2 63 + 1)..(2 63 - 1). Turbo Pascal поддерживает две модели генерации объектного кода с числами с плавающей запятой : - Программная поддержка чисел с плавающей запятой {$N-} - Аппаратная (80x87) поддержка чисел с плавающей запятой {$N+} Вы можете использовать директиву компилятора $N для переключения между двумя моделями. В режиме $N+, директива компилятора $E управляет, включать ли библиотеки эмуляций 80x87 в готовую программу. 0

Опции темы