Сделать блок-схему стиха(только зачем же такая диета? если любить – то лишь в полную силу! если любить – то любить без запретов! даже если она не через if then и else или объясните..
If - если Then - то Else - иначе Например: C:= A - B; (Если С больше нуля то) If C > 0 then begin (Вывод о том что) Writeln(число положительное); ... (Иначе оно) End esle (Может быть только отрицательным) Writeln(число отрицательное); ... Это же можно проделать с двумя if(если) If C > 0 then begin Writeln(число положительное); ... (Если С меньше нуля) If C < 0 then begin Writeln(число отрицательное); ...