Интересно подумть....наверное...

[novichok1311]

Нужно узнать в чём тут ошибка....ниже показан фрагмент из проги.Короче вводится число к примеру 10 а потом отнимается 5 так вот если поставить не 5 а 11 и более то должно выдать ошибку что как это от 10 отнять 11!!!

27:textcolor(12);
Writeln('Сколько вы хотите удалить файлов в формате txt?');
textcolor(2);
readln(nn);
If (glava<nn) and (txt<nn) then Writeln('Ошибка!');
else begin 29;
end;
goto 28;
29:glava:=glava-nn;
txt:=txt-nn;
for i:=1 to aa do

[Stilet]

Мдя... Информативный топ... Стелепатирую:

If (glava-nn)<0 then Writeln('Ошибка!');

[novichok1311]

Сообщение от Stilet

Мдя... Информативный топ... Стелепатирую:

If (glava-nn)<0 then Writeln('Ошибка!');

Ок glava=5;
nn=3;
If(5-3)<0 then ОШИБКА?

[Stilet]

Не ты действительно думаешь что кто-то тебя понял?
Наивно.