В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
kris7510
kris7510
15.03.2021 02:47 •  Информатика

Объединение последовательностей
Даны две бесконечных возрастающих последовательности чисел
A
A
и
B
B
.
i
i
-ый член последовательности
A
A
равен
i
2
i2
.
i
i
-ый член последовательности
B
B
равен
i
3
i3
.
Требуется найти
C
x
Cx
, где
C
C
— возрастающая последовательность, полученная при объединении последовательностей
A
A
и
B
B
. Если существует некоторое число, которое встречается и в последовательности
A,
A,
и в последовательности
B
B
, то в последовательность
C
C
это число попадает в единственном экземпляре.
Входные данные
В единственной строке входных данных дано натуральное число
x(1≤x≤
10
6
)
x(1≤x≤106)
.
Выходные данные
Выведите дам максимум

Показать ответ
Ответ:
borz2006
borz2006
28.03.2020 20:36
1) д , 2) в . Наверно , мое личное мнение.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
0,0(0 оценок)
Ответ:
otecya
otecya
02.02.2023 18:52
Const
  s0=100000; { первоначальная сумма в копейках }
  p=0.02; { величина, равная 1/100 от ежемесячного процента }
var
  s,sp:longint;
  mes:integer;
begin
  { все расчеты ведем в копейках }
  mes:=0; s:=s0;
  while sp<=30*100 do
    begin mes:=mes+1; sp:=Round(s*p); s:=s+sp end;
  Writeln('Месяц ',mes,', сумма процента ',sp/100:0:2,' > 30');
  mes:=0; s:=s0;
  while s<=1200*100 do begin mes:=mes+1; s:=s+Round(s*p) end;
  Writeln('Месяц ',mes,', сумма вклада ',s/100:0:2,
      ' > 1200');
end.

Результат выполнения программы:
Месяц 22, сумма процента 30.31 > 30
Месяц 10, сумма вклада 1218.98 > 1200
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота