Решите!!!!!!!!!!!!!!!!!!!!!!!

Решите!!!!!!!!!!!!!!!!!!!!!!!

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

var P,a,h: integer;

S: real;

begin

a:=12;

h:=5;

S:=1/2*a*h;

P:=3*a;

writeln('Площадь треуголника = ',S);

writeln('Периметр треуголника = ',P);

end.

var a,b:integer;

begin

a:=12;

b:=5;

writeln('S = ', a*b);

a:=a+b;

writeln('P = ', 2*a);

end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт