Вывести на экран все целые числа из диапазона от А до В (А<=B), оканчивающиеся на цифру X (сделать в паскале)

Question

Славуха

6 декабря, 10:18

+2

Ответы (1)

Знаете ответ на вопрос?

Агна · Answer 1

var

a, b, i, x : integer;

begin

read (a, b, x) ;

for i : = a to b do if i mod 10 = x then writeln (i) ;

end.