В чем ошибка в программе ?

[student21]

Код: Выделить всё

program n;
var
a,b,c,d:integer;
begin
write ('Skolko deneg');
read(a);
write ('Stoimost odoi edenici tovara');
read(b);
d:=a div b;
c:=a mod b;
writeln ('Kolichestvo pokypok ',d);
writeln('Sdacha',c);
readln;
readln;
end.

[Mikhail]

Ошибка в чем выражается?

[student21]

Помогите с программой в лазарусе код есть а с формой что то проблемы

[Little_Roo]

в лазарусе код есть а с формой что то проблемы

Это не в лазарусе проблемы, а в Вашей голове, увы...
Как можно мешать консольную программу и оконное приложение (это говоря студиозным языком) ???????????
Добавляйте события на форму, и будет Вам счастье (или зачет) но, только .... после штудирования конспектов и документаций по языку...