Question

вивести число x якщо початкове її значення дорівнює заданому числу а кожне наступне збільшується на 4 поки х не буде перевищувати 30.​

Answer 1

Ответ:

Снизу

Объяснение:

program Programma1;

var A:integer;

begin

readln(A);

while A <= 30 do

begin

   write (A, ' ');

   A := A + 4;

   end;

end.