Задать вопрос Регистрация
Помочь другим

  • написать программу периметра шестиугольника спс

Ответы 2

  • Если у шестиугольника все стороны одинаковой длины, то можно так:

     

    Program Zadacha;Var    n, p: Integer;Begin    Write('длина стороны шестиугольника = ');    ReadLn(n);        p := 6 * n;        WriteLn('периметр = ', p);        ReadLn;End.

  • program cmisfnjs;

    uses crt;

    var a,b,c,d,e,f,p:integer;

    begin

    readln(a,b,c,d,e,f);

    p:=a+b+c+d+e+f;

    writeln(p);

    readln;

    end.

     Если стороны разные, 

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years