Ответ:
Var
y,x: integer;
begin
writeln('Ведите ваше число:');
read(x) ;
if x > 2 then
writeln('Результат y =: ', x+3)
Else
if x <=- 2 then
writeln('Результат y =: ', 1 div x);
Readln ;
end.
Формула указана не ясно в задании, я указал в ответе так как оно более менее смотрится понятно, но вам стоит уточнить. Что до алгоритма, то он выглядит вот таким вот образом. Внимание, первый член данного ряда считается за 0, вам стоит так же уточнить у преподавателя, в задании этого явно не указано, но зачастую такое значение традиционно.
Ошибки в вашем алгоритме:
1. У вас условие k < 0, это значит, что если будет введено k = 0, то алгоритм отработает, но 0 членов быть не может, это не имеет смысла.
2. Цикл у вас выводит значение n-го члена после каждой итерации, а не единожды.
Спасибо за отметку "Лучший ответ" и нажатую кнопочку "спасибо" (:
program FibonachiNums;
function FibN(n: integer): BigInteger;
begin
var (f1, f2) := (BigInteger(1), BigInteger(1));
for var i := 3 to n do
(f1, f2) := (f2, f1 + f2);
result := f2;
end;
function FibSumN(n: integer): BigInteger;
begin
var (f1, f2) := (BigInteger(1), BigInteger(1));
var Sum: BigInteger;
if n = 0 then Sum := 0
else Sum := 1;
for var i := 2 to n do
begin
(f1, f2) := (f2, f1 + f2);
Sum += f1;
end;
result := Sum
end;
begin
Println('десятое число Фибоначчи:',FibN(10));
var n := 100;
Writeln($'{n}-е число Фибоначчи: ',FibN(n));
Println($'Сумма первых {n} чисел Фибоначчи:',FibSumN(n))
end.
На рисунке большой круг включает в себя два маленьких. Так как города в Англии и столичные европейские города все являются европейскими городами, то множество а включает в себя множества б и в, большой круг - множество а. Его элементы: Манчестер, Ливерпуль, Лондон, Москва, Париж, Мадрид, Венеция, Брест, а также многие не указанные на рисунке города, например, Кардифф, Женева, Милан.
Оставшиеся два круга представляют города в Англии и европейские столицы. Так как в множество, отвечающее левому кругу, входят Манчестер, Ливерпуль и Лондон, то это города Англии. В это множество входят и другие города, например, Кардифф.
Правому кругу, в котором записаны Лондон, Москва, Париж и Мадрид, остаётся только множество европейских столиц. В это множество входит также Женева и другие города.
По формуле или
(N - мощность алфавита, i - вес одного символа)
Вес одного символа бит (округляем в большую сторону так как кусками тут быть не может)
Вес одного символа бит (округляем в большую сторону так как кусками тут быть не может)
10 / 6 = 1.6666666666666667 раз