Есть ответ 👍

Написать программу, вычисляющую площадь круга, с радиусом r *

170
451
Посмотреть ответы 2

Ответы на вопрос:


// pascalabc.net 3.0, сборка 1160 от 05.02.2016 begin   writeln('s=',pi*sqr(readreal('r=')): 0: 5) end. тестовое решение: r= 12.7 s=506.70748

begin

  var a : = arrgen(10, i -> 20 * i + 13);

  a.println;

  var b : = arrgen(17, i -> 17 - i);

  b.println

end.

объяснение:

тут главное найти формулу для общего члена.

а) 33 - 13 = 20; 53 - 33 = 20 все понятно, последующий элемент получается из предыдущего путем прибавления 20.

a[i+1] = a[i] +20 - это рекуррентная формула.

можно также получить значение любого элемента как

a[i] = 20*i - 7, где i = 1, 2, 10 или

a[i] = 20*i + 13, где i = 0, 1, 2, 9

б) здесь числа просто убывают от 17 до 1.

a[i+1] = a[i] - 1 - рекуррентная формула

a[i] = 18 - i, где i = 1, 2, 3, 17 или

a[i] = 17 - i, где i = 0, 1, 2, 16

какие из этих формул были использованы в программе, видно без объяснений.

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