tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано натуральное число n.
Дано натуральное число n. вычислить, используя while и repeat: 1/sin1+1/(sin1+sin2)++1/(sin1+sin2+sinn)
givlinkovpaschozszti
1 26.09.2019 21:30
8
Ответы
arujanjagipar
08.10.2020 21:12
Begin
var n := ReadlnInteger('n =');
var i := 1;
var s1,s2:real;
while i <= n do
begin
s1 += Sin(i);
s2 += 1/s1;
i +=1;
end;
Write('S = ',s2)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Alex200488005553535
04.08.2019 18:50
Сколько бит в памяти компьютера займёт слово «человек»?...
Yuska11
04.08.2019 18:50
Cколько байтов в компьютерной памяти займёт слово «мех»?...
Dok11111111111
04.08.2019 18:50
Сколько байт памяти занимает цветное изображение шириной 500 точек и высотой 20 точек в цветовой модели rgb?...
Лерокyug
04.08.2019 18:50
Что такое онлайн-урок ? это когда в прямом эфире урок и ты общаешься с преподавателями? объясните, , как можно подробнее и как вообще они проходят?...
лиза286489
04.08.2019 18:50
Написать программу, которая выводит на экран результаты следующих действий: а. 27−5= б. 11+21= в. 32/2= г. 2+2•2= д. (2+2)•2=...
natalia27347
10.08.2019 19:50
1. какие из перечисленных ниже характеристик относятся к оперативной, а какие – к внешней памяти? а) является энергозависимой. б) её объём измеряется десятками и сотнями...
looolll2k17
10.08.2019 19:50
Два текста содержат одинаковое количество символов . первый составлен из символов алфавита мощностью 16 , а второй текст -из символов алфавита мощностью 256. во сколько...
dpa2807
10.08.2019 19:50
Информатика признак сравнения одинаковый смысл текста да или нет...
ElenaComarova
15.09.2020 15:46
114. Теңдеу бойынша есеп құрастырыңдар: 1) 250 – Зу = 115;2) х + 3x + 2. Зr3) (48 - x) : 8 = 4.120;есеп шыгару тендеуден ...
abidat1122
26.05.2019 22:50
Что такое пакет программ, работой компьютера и обеспечивающий взаимодействие между человеком и компьютером? (2 слова; первое 12 букв; второе 7)...
Популярные вопросы
Что значит в современном мире быть образованным человеком сочинение...
2
60 . сделать синтаксический разбор тип(повеств,невоскл) и написать...
3
Всоревнования участвовали 24 бегуна, гимнастов в 8 раз меньше. сколько...
1
Найдите угол aob на 40° больше, чем boc,а aoc развернутый начертите...
1
X/7 - 34 = 26. найти х если не понятно что-за х/7 это икс седьмых...
3
Решите уравнение: а) 2 (x-2)+x (x-2)=0 б) 5 (y+-1)(y+3)=0 решите уравнение...
1
Краствору кислоты массой 58 г с массовой долей кислоты 5% добавили...
1
6предложений о моих любимых уроках.биология и...
1
Перчислите признаи класса однодольные...
2
Две ласточки вылетели из разных точек одновременно навстречу друг другу...
1
var n := ReadlnInteger('n =');
var i := 1;
var s1,s2:real;
while i <= n do
begin
s1 += Sin(i);
s2 += 1/s1;
i +=1;
end;
Write('S = ',s2)
end.