Question

составьте программу выводящую на экран все двузначные числа у которых первая цифра в два раза больше второй

Answer 1

Допустим, если двузначное число С
С (A = 2B; B)
Что то вроде этого

Answer 2

var i:integer;
begin
for i:=10 to 99 do
 if (i div 10)= 2*(i mod 10)
then write(i:4)
end.