Курсовая работа: Составить программу обучения работе с клавиатурой

18:label1.Caption:= oo;

19:label1.Caption:=pp;

20:label1.Caption:=aa;

21:label1.Caption:=ss;

22:label1.Caption:=dd;

23:label1.Caption:=ff;

24:label1.Caption:=gg;

25:label1.Caption:=hh;

26:label1.Caption:=jj;

27:label1.Caption:=kk;

28:label1.Caption:=ll;

29:label1.Caption:=zz;

30:label1.Caption:=xx;

end;

m:=edit1.Text; // присваиваем введенное пользователем текстовое значение

// сравниваем текст с константой

// при равенстве счетчику правильных слов

// присваиваем +1

if m=prob then t:=t+1;

if m=f then t:=t+1 ;

if m=n then t:=t+1 ;

if m=h then t:=t+1 ;

if m= u then t:=t+1 ;

if m= y then t:=t+1 ;

if m= l then t:=t+1 ;

if m= d then t:=t+1 ;

if m=r then t:=t+1;

if m= qq then t:=t+1;

if m= ww then t:=t+1;