Помогите пожалуйста. Программка Паскаль

Помогите пожалуйста. Программа Паскаль

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

Ответ:

1)

Begin

Read(x1,y1,x2,y2);

Write(sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1)));

End.

2)

Begin

Read(a,b,c);

P:=(a+b+c)/2;

Write(sqrt(p*(p-a)*(p-b)*(p-c)));

End.

Любовь Фальк-Сегаль
Пишет безызвестный индетификатор x1
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт