AnStep_1

DIM F AS INTEGER, C AS INTEGER
CLS
INPUT "Введите градусы по цельсию: ", C
INPUT "Введите градусы по фаренгейту: ", F
PRINT C; "c = "; C * (9 / 5) + 32; "f"
PRINT F; "f = "; (F - 32) * (5 / 9); "c"