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

[ismayil]

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

 

[владддд]

С помощью цикла for, условного оператора if и операторов mod,div

 

[ГоШа2013]

Просто для каждой цифры, которая делится на 2, получить вторую цифру выполнив это деление и вывести обе цифры на экран. For, if и mod тут не к месту, да и div не особо нужен. var X: Integer; begin X := 2; repeat WriteLn(X, X shr 1); X := X + 2; until X = 10; end.