ВЫВЕСТИ ** ЭКРАН ЧИСЛА ОТ -99 ДО 99 ОКАНЧИВАЕТСЯ ** 7

Question

ВЫВЕСТИ НА ЭКРАН ЧИСЛА ОТ -99 ДО 99 ОКАНЧИВАЕТСЯ НА 7

Answer 1

Pascal

------------------------------------------------------------------

var
   x: integer;
begin
for x := -99 to 99 do
  If abs(x) mod 10 = 7 then
    writeln(x);
readln;
end.

---