Question

допоможіть пж срочно

Answer 1

Ответ:

program Loop2;
var
   x : Integer = 5;
begin
   while x < 25 do
   begin
       x := x + 4;
   end;
   writeln(x);
end.