Выведите (через пробел) все четные числа от a до b (включительно)

Question

34

в избранное ссылка

Знаете ответ?

abdalov · Accepted Answer

36

abdalov

01 марта 2023

program test; var a, b, i: integer; begin write ('Enter a, b: '); readln (a, b); for i: =a to b do if i mod 2=0 then write (i, '); readln; end.

комментировать

в избранное ссылка отблагодарить