tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Ссоставлением алгоритма,
Ссоставлением алгоритма, ! дана последовательность, общий член которой определяется формулой: an = (n-1)/n^2. вычислите сумму тех её членов, которые больше заданного числа e при n> =2
sirius830
1 04.07.2019 07:40
11
Ответы
matvee1
28.07.2020 01:22
Var S,E:real;
N:integer;
Begin
Write('E = ');ReadLn(E);
N:=2;
S:=0;
While (N-1)/(N*N)>E do
Begin
S:=S+(N-1)/(N*N);
N:=N+1
End;
WriteLn(S)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
гуфиn
26.10.2020 12:17
2. ( ів) Виконавець «Рудий кіт» (мова програмування Scrath) виконавнаступну послідовність команд та отримав орнамент,крити натиснутиереміститись аж -2 30 у оалати колір...
Nuregre
29.02.2020 13:21
Сколько бит памяти занимает чёрно-белое изображение (без градаций серого) шириной 60 точек и высотой 400 точек?...
pav9
29.02.2020 13:20
Памигити решите только всё...
EzNoobXex
21.05.2020 09:25
Объясните решение Чему равно значение переменной s после выполнения фрагмента программы: s:=0; for i:=1 to 4 do s:=s+2*i;...
pashacherepano
21.05.2020 09:24
Перетащи значения к их типам даных82000TrueхInteger -String -Boolean -Char...
yaltalove67
21.05.2020 09:24
В электронной таблице нельзя удалить: 1) строку; 2) столбец; 3) адрес ячейки; 4) содержимое ячейки....
lidaat
21.05.2020 09:08
Во Операционная система это: техническая документация компьютера совокупность устройств и программ общего пользования совокупность основных устройств компьютера комплекс...
GlendaRei
21.05.2020 09:08
Узнайте, сколько времени понадобится для того, чтобы скачать файл размером2000 Мбайт, если скорость локальной сети равна 100 Мбит/секунду. ответ запишите в секундах....
ПоЛиНа201420142014
21.05.2020 09:08
Запиши доменное имя компьютера, зарегистрированного в домене первого уровня коммерческие организации, в домене второго уровня flowers и имеющего собственное имя www....
valityuk
21.05.2020 09:07
Выбери сферы кибернетики.экономика;математика;инженерия;буря;звёзды;...
Популярные вопросы
решить примеры 1 и 4 Только можете написать решение И сфоткать его...
3
Сколько г h2so4 образовалось при взаимодействии 160 г so3 с достаточным...
3
ответить на вопросы по модели куба...
2
З якого документа наведено уривок? ● Про які зміни в управлінні...
1
Решить 3.15 (1) и 3.16 (1)....
3
Выпишите словосочетания: А) именные; Б) глагольные; В) наречные....
2
Найдите произведение ху, если для взаимно простых чисел 4х – 3 и...
2
это самое максимальное кол во балов которое было...
3
Епізод який запам ятався найбільше у повісті Григіра Тютюнника Климко...
1
определите номенклатуру 1:1000000 карты на которой изображен город...
1
N:integer;
Begin
Write('E = ');ReadLn(E);
N:=2;
S:=0;
While (N-1)/(N*N)>E do
Begin
S:=S+(N-1)/(N*N);
N:=N+1
End;
WriteLn(S)
End.