If x>y then begin writeln ('Не попал! Число больше!');goto m; end;
<span>if x<y then begin writeln('Не попал! Число меньше');goto m; end;</span>
Час,чин,рок,пир,пик,рок,ворс,вор,воск,икра,сова,сани,ворсинка,сироп,спинка,спичка,парк,искра и тд.Очень много слов
Если есть pascal на компе, то там в примера есть данный диалог,,, А так это легко сделать через readln и writeln операторы
=(7+2+6+4+6+0+9)/7=34/7=4,857142857142857