Предмет: Информатика,
автор: lyoshaminakoff
Напишите программу в PascalABC
x*(x+1/2)*(x+2/3)*(x+3/4)....(x+15/16)
Ответы
Автор ответа:
0
Ответ:
Объяснение:Что это за точки после (x+3/4).... ? К чему они ?
uses crt ;
var x,s : real ;
begin
clrscr;
Writeln('Введите x ');
readln ( x ) ;
s:= x*(x+1/2)*(x+2/3)*(x+3/4)*(x+15/16);
writeln ( s:2:3);
readkey;
end.
var x,s : real ;
begin
clrscr;
Writeln('Введите x ');
readln ( x ) ;
s:= x*(x+1/2)*(x+2/3)*(x+3/4)*(x+15/16);
writeln ( s:2:3);
readkey;
end.
Похожие вопросы
Предмет: Математика,
автор: taraspavlenko6
Предмет: Английский язык,
автор: Аноним
Предмет: История,
автор: Anonim6363
Предмет: Обществознание,
автор: Barbusa24s
Предмет: Математика,
автор: маша939
var x,s : real ;
begin
clrscr;
Writeln('Введите x ');
readln ( x ) ;
s:= x*(x+1/2)*(x+2/3)*(x+3/4)*(x+15/16);
writeln ( s:2:3);
readkey;
end.