tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Pascal найти сумму 35
Pascal найти сумму 35 членов ряда s=2/3+4/9+6/27+8/
mrmistik41
2 03.09.2019 02:40
16
Ответы
Ychenik77
06.10.2020 13:45
Эта сумма равна 75047317648499524 / 50031545098999707, что приблизительно составляет 1.49999999999999927046.
// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
var k:=BigInteger(3);
var s:=2/k;
for var i:=2 to 35 do begin k*=3; s+=2*i/k end;
Writeln('s=',s)
end.
Результат
s=1.5
ПОКАЗАТЬ ОТВЕТЫ
Nyrkoff
06.10.2020 13:45
На первом скрине сама программа на втором результат её работы, сумму я округлил чтобы перед запятой было 3 знака и после
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
yayiliya
09.03.2021 13:33
Найдите правильную запись данного арифметического выражения на языке Python. Будьте добры ....
aleksandragapov
09.03.2021 13:34
Задача 2. «Вартість» 3 клавіатури вводимо ціну за 1 кг яблук і груш. Вводимо вагу придбаних яблук і груш. Знайти вартість покупки (загальну вартість і вартість...
ariiiiiaha
09.03.2021 13:35
1. Напишите результат работы программы в отведенном для этого месте. print ( Salem. Kazakhstan ) !...
MD200405
09.03.2021 13:35
1)Как называется датчик ? 2) Какие функции он выполняет? 3) В каких режимах работает данный датчик?(3) ...
kissssss7s8
09.03.2021 13:35
КТО МОЖЕТ ТАК В Word-де сделать??? ...
tjcjdjf
09.03.2021 13:35
с сором. На сколько угодно вопросов...
9fhneh
18.12.2019 09:04
50 5. алфавит языка программы pascal cостоит из : а) из целых и дробных чисел, дополнительных символов и знаковб) из латинских букв, дробных чисел, специальныэ...
S1mplendnnd
18.12.2019 08:59
Дан массив из 10 целых чисел заданный случайным образом, вывести в другой массив числа кратные 5, вывести на экран первый и второй массивы. использовать if и mod...
натали574
18.12.2019 08:58
Соматическая устройство осуществила автоматическую перекодировку информационного сообщения на языке и 16 битного представления unicode в 8 битную кодировку кои-8....
gubankowauly19
18.12.2019 08:58
Решите все номера по информатике...
Популярные вопросы
Тест для 6 класса. ( См. грамматический справочник модуль 6,...
1
3.1. Выберите из предложенного списка и вставьте в текст пропущенные...
1
Перечислите цели профессионального образования...
3
Укажіть реченняз безполучниковим звязком наді мною вечір жменями...
2
У посудину з водою помістили шматочок калію. До утвореного розчину...
1
Скину 300руб за выполнение этого, и пару других подобных заданий!Різниця...
3
Даны векторы а (3;4) и b(-5;-7) значит векторы а и решить...
1
8. Как определяется масса оксида серы (1Y) в растворе аликвотной...
3
Імена видатних історичних діячів кінця XVII - на початку XVIII)...
3
Составьте исторический портрет Дмитрия Донского и Ивана |||Очень...
2
// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
var k:=BigInteger(3);
var s:=2/k;
for var i:=2 to 35 do begin k*=3; s+=2*i/k end;
Writeln('s=',s)
end.
Результат
s=1.5