PascalABC. Помогите решить, пожалуйста.Составьте программку подсчета площади равнобедренного

PascalABC. Помогите решить, пожалуйста.
Составьте программку подсчета площади равнобедренного треугольника. Если площадь треугольника четная, разделить ее на 2, в противном случае вывести сообщение "Не могу делить на 2!"

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

program pl1

var a, h, s: real;

begin

readln (a);

s:=a*h/2;

writeln('s=', s);

end.

Мирослава Белоусько
Там где readln (a;h);
Angelina
Огромное спасибо!
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт