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

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

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.