Напишите программ определения диагоналей в многоугольнике. для определения кол-ва диагоналей воспользуйтесь формулой к=n*(n-3)/2, где: n- число сторон многоугольника; к- число диагоналей.
Var n,K:real; ///Объявленные переменные begin ///старт цикла read(n); ///ввод переменной n K:=n*(n-3)/2; writeln('Кол-во диагоналей = ',K); ///вывод ответа end.
begin ///старт цикла
read(n); ///ввод переменной n
K:=n*(n-3)/2;
writeln('Кол-во диагоналей = ',K); ///вывод ответа
end.
Написано на Паскале ABC.