|
zadach184.BAS |
|
{* Задача184 *}REM basic ' Составить программу, позволяющую многократно рассчитывать' 'произведение двух чисел. Для выхода из программы нужно ввести 0, 0CLS
NewAB:
INPUT "Введите A, B. (0, 0) для выхода. {, A, B
} If A 0 Or B 0 Then
PRINT A * B
GoTo NewAB {Передаем управление в INPUT
} Else
End
End If
End
|