zadach424.BAS

{* Задача424 *}

REM basic

' Вывести на экран все трёхзначные числа,кратные 13 в обратном порядке


CLS
For i=999 To 100 Step-1
If i Mod 13=0 Then PRINT i;
Next
End