Что неверно? пишу программу и неполучается в ней. . непонимаю что не так...

Question

program znak; 
 var a, b, c, x, r : integer; 
 begin 
 for a:= 10 to 99 do 
 begin 
 b:= a div 10 
 c:= a -( b * 10 ) 
 x:= b + c 
 if a mod x =0 then write(a) 
 end ; 
 end .

Оксана · Accepted Answer

Какое задание? Как можно сказать, что неправильно, если неизвестно, что должно получится? 
А заодно напиши, что выходит, а то компилировать лень.

Вячеслав Морозов · Answer

Точек с запятой нет нигде, что же еще.

Ivann Peroff · Answer

точка с запятой в 6-8 строках поставь

Дмитрий · Answer

а ктоза тебя точку с запятой ставить должен? Компилятор?

b:= a div 10; 
c:= a -( b * 10 ); 
x:= b + c;