Вывести все "-" члены арифметической прогрессии -11;-7...
Так в математике пишут ответы )))
извините, не увидел, что задание по информатике, ставьте нарушение
Оно мне надо? Правил Вы не нарушали, а дальше дело автора вопроса))
Var a:integer; begin a:=-11; while a<0 do begin<br> Write(a,' '); a:=a+4 end end. Результат -11 -7 -3