По двум диагоналям ромба найти площадь ромба и длину стороны.записать в виде блок-схемы

263

342

Посмотреть ответы 1

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

toly22

Информатика

4,8(53 оценок)

// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! procedure l(s: sequence of integer); begin s.print(','); writeln(': s=',s.sum,', п=',s.aggregate(biginteger(,q)-> p*q)) end; begin var n: =readinteger('n='); l(range(1,2*n-1,2)); l(range(2,2*n,2)); l(range(3,3*n,3)); l(range(4,4*n,4)) end. пример n= 10 1,3,5,7,9,11,13,15,17,19: s=100, п=654729075 2,4,6,8,10,12,14,16,18,20: s=110, п=3715891200 3,6,9,12,15,18,21,24,27,30: s=165, п=214277011200 4,8,12,16,20,24,28,32,36,40: s=220, п=3805072588800