Регистрация
Mockov
10.04.2020 20:10
Информатика
Есть ответ 👍

Даны числа от 1 до n.найти р: 1/1*1/2*…*1/n

260
464
Посмотреть ответы 3

Ответы на вопрос:

Rom4ik1105
Rom4ik1105
4,8(95 оценок)

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.

SheriStriff
SheriStriff
4,6(2 оценок)

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); readlnend.

Leron462
Leron462
4,6(75 оценок)

12*40*32=15360 символов

15360*16=245600 бит (информационный объем рассказа)

145600 бит = 30 720 байт = 30 кбайт

ответ: 30 килобайт.

Популярно: Информатика