Вывести все "-" члены арифметической прогрессии -11; -

ExeLisor ExeLisor    2   17.09.2019 08:20    0

Ответы
380674944183 380674944183  21.08.2020 10:24
Var
  a:integer;
 
begin
  a:=-11;
  while a<0 do begin
    Write(a,' ');
    a:=a+4
    end
end.

Результат
-11 -7 -3
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика