вопро по поводу turbo Paskal

Question

посмотрите пожалуйста программа создана правильно?
Program Homework;

Var a,x,p:Real;

Begin

WriteLn('Введите x,a');

ReadLn(a,x);

p:=5a+3xSQRT1+SINx;

WriteLn('Их произведение равно');

ReadLn;

End.

Екатерина Евгеньевна · Accepted Answer

Нет. Причём, неправильно тут почти всё.
Ввод не в том порядке, p:=5*a+3*x*(SQRT(1+SIN(x))); при выводе - это никак не произведение. Да там ничего и не выводится, кроме текста. Надо было и р тоже напечатать...

Евгений Неделько · Answer

WriteLn('Введите x,a');ReadLn(a,x);

ошибки