Очень прошу Задача 3 Посчитайте сумму всех чисел ** полуинтервале [a; b) или [b; a), в...

Question

Очень прошу Задача 3 Посчитайте сумму всех чисел на полуинтервале [a; b) или [b; a), в зависимости от того, какое число больше. Пример ввода:10 1 Пример вывода: 45 Задача 4 Посчитайте сумму квадратов всех чисел, находящихся в полуинтервале [a, b) или [b, a), и выведите ее на экран. Пример ввода:8 4 Пример вывода: 126 Задача 5 Числа Фибоначчи – известная числовая последовательность, в которой первые два члена равны единице, а каждый последующий получается сложением двух предыдущих. По введенному числу n выведите n чисел Фибоначчи. Пример ввода:8 Пример вывода: 1 1 2 3 5 8 13 21

Comments

Какой язык программирования?

---

Питон

Answer 1

Ответ:

pascal

Объяснение:

program summa_3;

var

 a, b, s:  integer;

begin

 Write('Ведите числа a и b: ');

 ReadLn(a, b);

 if b < a then Swap(a, b);

 while a < b do

   begin

     s := s + a;

     a := a + 1;

   end;

 WriteLn(s);

end.

program summa_4;

var

 a, b, s:  integer;

begin

 Write('Ведите числа a и b: ');

 ReadLn(a, b);

 if b < a then Swap(a, b);

 while a < b do

   begin

     s := s + sqr(a);

     a := a + 1;

   end;

 WriteLn(s);

end.

program fibo_5;

var

 a, b, s, i, n:  integer;

begin

 Write('Ведите n: ');

 ReadLn(n);

   a := 0;

   b := 1;

   Write(b,' ');

   for i := 2 to n do

   begin

       Write(a + b,' ');

       s := b;

       b := a + b;

       a := s

   end;

end.

Comments

Я забыла уточнить , что мне в питоне нужно

---

Жаль... :( у меня сейчас нет питона на компе, а так плохо нюансы помню, в голове не смогу...

---

Вправду жаль, но спасибо все равно

---

А с++ понимаешь?

---

на компе на этом ничего не стоит кроме паскаля, дома на ноуте все языки стоят... а так-то без разницы, на каком языке писать, тем более такое элементарное... просто синтаксис в голове не держу

---

Посмотри у меня задачи, сможешь на с++ сделать?????

---

У меня так баллы, помоги с задачами , с+++, умоляю