Программа:
var a, b: integer;
begin
read(a, b);
if (a mod 2 <> 0) then a := a + 1;
while a <= b do
write(a, ' ');
a := a + 2
end
end.
Пример ввода:
1 15
Пример вывода:
2 4 6 8 10 12 14
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Программа:
var a, b: integer;
begin
read(a, b);
if (a mod 2 <> 0) then a := a + 1;
while a <= b do
begin
write(a, ' ');
a := a + 2
end
end.
Пример ввода:
1 15
Пример вывода:
2 4 6 8 10 12 14