Где ошибся? не могу понять
Если на языке паскаль то забыл написать в конечном итоге что выдавать будет и не написал end.
ну попробуй значение " n" в формате real
Read(); заменить на readln();