Ответ:
Снизу
Объяснение:
program Programma1;
var A:integer;
begin
readln(A);
while A <= 30 do
write (A, ' ');
A := A + 4;
end;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Снизу
Объяснение:
program Programma1;
var A:integer;
begin
readln(A);
while A <= 30 do
begin
write (A, ' ');
A := A + 4;
end;
end.