5. Дана последовательность вещественных чисел, упорядоченная по возрастанию, и число n, не равное ни одному из чисел последовательности и такое, что а1 а) Определить сумму чисел последовательности, меньших n.
б) Найти два элемента последовательности (их порядковые номера и значение) в интервале, между которыми находится значение n.

ЯЗЫК КуМир

Показать ответ

Ответ:

Psix73

24.10.2020 23:16

Последовательность Фибоначчи.
$F_{1} = 1 \\ F_{2} = 1 \\ F_{i} = F_{i-1} + F_{i - 2}$
Следующий элемент: 34 + 55 = 89

1, 2, 3, 4, 5, 6, 7, 8, 9, 1, 0, 1, 1, 1, 2, 1, ...

Записываем все натуральные числа подряд и разбиваем их на цифры
$1, 2, 3, ..., 10, 11, 12, 13, ... \to 1, 2, 3, ..., 1, 0, 1, 1, 1, 2, 1, 3, ...$

о, д, т, ч, п, ш, с, в, д, д, ...
Выписываем натуральные числа в ряд. Каждому натуральному числу сопоставляем первую букву его названия.
1 -> о (один)
2 -> д (два)
...
10 -> д (десять)
11 -> о (одиннадцать)

Первый элемент 1. Каждый следующий элемент образуется так: выделяем цифру, считаем, сколько раз она встречается подряд в этом числе, начиная с текущей позиции и приписываем в конец нового числа пару (сколько раз цифра встречается подряд, сама цифра)
1) 1
2) 1 встречается 1 раз. Значит, пишем 11
3) 1 встречается 2 раза. Значит, пишем 21
3) 2 встречается 1 раз. Значит, пишем 12. 1 встречается 1 раз. Значит, пишем 11. Получилось 1211
4) 1 встречается 1 раз. Значит, пишем 11. 2 встречается 1 раз. Значит, пишем 12. 1 встречается 2 раза. Значит, пишем 21. Получилось 111221.
5) аналогично
6) 3 встречается 1 раз. Значит, пишем 13. 1 встречается 1 раз. Значит, пишем 11. 2 встречается 2 раза. Значит, пишем 22. 1 встречается 2 раза. Значит, пишем 21. Получилось 13112221

0,0(0 оценок)

Ответ:

famousgirl

23.10.2022 23:03

Консольное приложение:
const n=9;
var l:array[1..n] of integer;
i,max,imax,min,imin,s:integer;
begin
Randomize;
writeln('Массив L:');
for i:=1 to n do
begin
l[i]:=random(51);
write(l[i]:4);
end;
writeln;
max:=l[1]; imax:=1;
min:=l[1]; imin:=1;
for i:=2 to n do
begin
if l[i]>max then begin max:=l[i]; imax:=i; end;
if l[i]<min then begin min:=l[i]; imin:=i; end;
end;
writeln('max = l[',imax,'] = ',max);
writeln('min = l[',imin,'] = ',min);
s:=0;
if imax>imin
then for i:=imin+1 to imax-1 do s:=s+l[i]
else for i:=imax+1 to imin-1 do s:=s+l[i];
writeln('s = ',s);
end.

Пример:
Массив L:
31 49 41 15 9 47 37 11 27
max = l[2] = 49
min = l[5] = 9
s = 56

0,0(0 оценок)

Популярные вопросы: Информатика