Все категории

3 года назад

Сложение факториальных чисел 3221ф и 40301ф. Помогите. Ответ также в факториальном виде.

Знания

Информатика

1 ответ:

ЕвгенаТол19993 года назад

0 0

Переведи эти числа в десятичную сс, сложи, а потом полученное число переведи в факториальную сс

Читайте также

Ребят, помогите. Паскаль. Вообще не понимаю, как это делается

денисенция [1]

var

x1, x2, y : real;

r1, r2 : byte;

begin

writeln('введите:');

write('X1 = ');

readln(x1);

write('X2 = ');

readln(x2);

write('R1 = ');

readln(r1);

write('R2 = ');

readln(r2);

y := Power(10, x1-r2)*(abs(x2-r1)/sin(degToRad(x2)));

writeln('Y = ', y);

end.

var s : real;

begin

for var n := 5 downto 1 do begin

var fac : integer := 1;

for var i := 1 to 2*n do fac *= i;

s += 1/fac;

end;

writeln(s);

end.

var

s, a, eps : real;

n : integer;

begin

write('ввелте точность EPS = ');

readln(eps);

repeat

n += 1;

a := Power(-1, n-1)/sqr(n);

if abs(a) <= eps then s += a;

until abs(a) <= eps;

writeln('S = ', s);

end.

надеюсь нигде в расчетах не накосячил...

0 0

4 года назад

Дано целое число A, значение которого вводится с клавиатуры. Написать программу, которая выводит на экран true , если A не кратн

СЕвгений

Var a:integer;
begin
readln(a);
if ((a mod 3 <>0) and (a mod 10 = 0) and (a div 10>0)) or (a=0) then
writeln ('true')
else writeln ('false');
<span>end.</span>

0 0

4 года назад

Задается положительное целое число n. Нужно вывести произведение его цифр Формат входных данных Первая строка входного файла сод

PROSX

<h3>PascalABC.NET 3.4.2, сборка 1861 от 09.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

var s:=ReadLines('data.txt').First.Select(t->t.ToDigit)

.Aggregate(BigInteger(1),(a,b)->a*b).Println

end.

<h2>Пример</h2>

10057531504895395788703629698793031096713606951075840000000000000

<h3>Файл data.txt дан во вложении</h3>

0 0

4 года назад

Помогите Дам 34 балла Несколько вариантов

gal30

8 разрядов. ответ а.

0 0

4 года назад

Книга содержит 134 страниц. На каждой странице 39 строк. В каждой строке 59 символов (включая пробелы). Найти информационный объ

Яндекс Маркет [7]

По формулам считаем:

N=2^i
I=k*i

134=2^8
I=308334*8=2466672 бит=308334 байт=301 кбайт

0 0

4 года назад