СРОЧНО ! !ПОМОГИТЕ ! !вот часть программы

Question

вот часть программы 
 if kb1>0 then writeln(бла-бла-бла) 
 else writeln('бла-бла-бла) ; 
 halt; 
 
Нужно исправить так, чтобы если kb1=0 (отрицательные значения не нужны) , то программа выводит на экран текст 
"else writeln('бла-бла-бла); " и заканчивает программу, а если kb1>0, то программа выводит на экран текст 
"then writeln('бла-бла-бла); " и программа продолжается 
Предупреждаю с программированием знаком на уровне пальцев. 
Спасибо за помощь кто поможет)))

Ксения Нилова · Accepted Answer

if kb1>0 then writeln(бла-бла-бла) 
else 
if kb = 0 then 
begin 
writeln('бла-бла-бла) ; 
halt; 
end;