дана сторона равностороннего треугольника составьте программку для вычисления его периметра и

Дана сторона равностороннего треугольника составьте программку для вычисления его периметра и площади(Паскаль)

Задать свой вопрос
1 ответ

var a, b:integer;

begin

writeln ('Введите стороны a и b');

writeln ('Введите сторону a');

readln (a);

writeln ('Введите сторону b');

readln (b);

writeln;

writeln ('Периметр = ', (a+b)*2);

writeln ('Площадь = ', a*b);

readln;

end.

Инна Севальникова
ай, с площадю не так написал. подставь там для треугольника формулу
Даниил
а, во. бери
Вадим Шицко
program P1;var a, b, c, P, S: real;procedure Pr(a, b, c: real; var P: real);begin P := a + b + c;end;function F(a, b, c: real): real;var pp: real;begin pp := (a + b + c) / 2; f := sqrt(pp * (pp - a) * (pp - b) * (pp - c));end;begin Writeln('Vvedite a,b,c'); readln(a, b, c); pr(a, b, c, p); writeln('P = ', P, ' S = ', f(a, b, c));end.
Степа Чикишев
это к треугольнику
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт