Решите через repeat пожалуйста

Решите через repeat пожалуйста
Гость
Ответ(ы) на вопрос:
Гость
var a, b, h: integer; begin   read(a, b, h);   repeat     write(a, ' ');     a := a + h;   until a > b; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы