#include <stdio.h>
#include <math.h>
 
// 定义圆周率
#define PI 3.1415926535
 
int main() {
    // 变量定义
    double Z0, RL, XL, f, vp, l;
    double beta, tan_bl;
    double Rin, Xin;
    // 复数运算中间变量（分子/分母的实部、虚部）
    double N_real, N_imag, D_real, D_imag, denominator;
 
    // 标题
    printf("传输线输入阻抗计算器\n");
    printf("------------------------\n");
 
    // 用户输入
    printf("请输入特性阻抗 Z0（欧姆）：");
    scanf("%lf", &Z0);
 
    printf("请输入负载电阻 RL（欧姆）：");
    scanf("%lf", &RL);
 
    printf("请输入负载电抗 XL（欧姆）：");
    scanf("%lf", &XL);
 
    printf("请输入频率 f（赫兹）：");
    scanf("%lf", &f);
 
    printf("请输入相速度 vp（米/秒）：");
    scanf("%lf", &vp);
 
    printf("请输入传输线长度 l（米）：");
    scanf("%lf", &l);
 
    // 1. 计算相位常数 beta
    beta = (2 * PI * f) / vp;
 
    // 2. 计算 tan(beta * l)
    tan_bl = tan(beta * l);
 
    // 3. 严格按照传输线公式，展开复数运算
    // 公式：Zin = Z0 * (Z0 + j*ZL*tanβl) / (ZL + j*Z0*tanβl)，ZL=RL+jXL
    // 分子：Z0 + j*(RL+jXL)*tanβl = (Z0 - XL*tanβl) + j*(RL*tanβl)
    N_real = Z0 - XL * tan_bl;
    N_imag = RL * tan_bl;
    // 分母：(RL+jXL) + j*Z0*tanβl = RL + j*(XL + Z0*tanβl)
    D_real = RL;
    D_imag = XL + Z0 * tan_bl;
 
    // 4. 复数除法计算输入阻抗
    denominator = D_real * D_real + D_imag * D_imag; // 分母模的平方
    Rin = Z0 * (N_real * D_real + N_imag * D_imag) / denominator; // 输入阻抗实部
    Xin = Z0 * (N_imag * D_real - N_real * D_imag) / denominator; // 输入阻抗虚部
 
    // 输出结果
    printf("\n------------------------\n");
    printf("相位常数 beta = %.4f 弧度/米\n", beta);
    printf("tan(beta*l) = %.4f\n", tan_bl);
    printf("输入阻抗 Zin = %.4f ", Rin);
    if (Xin >= 0) {
        printf("+ j %.4f 欧姆\n", Xin);
    } else {
        printf("- j %.4f 欧姆\n", -Xin);
    }
 
    // 个人信息
    printf("\n计算者：你的姓名\n");
    printf("学号：你的学号\n");
 
    return 0;
}
 

I2luY2x1ZGUgPHN0ZGlvLmg+CiNpbmNsdWRlIDxtYXRoLmg+CgovLyDlrprkuYnlnIblkajnjocKI2RlZmluZSBQSSAzLjE0MTU5MjY1MzUKCmludCBtYWluKCkgewogICAgLy8g5Y+Y6YeP5a6a5LmJCiAgICBkb3VibGUgWjAsIFJMLCBYTCwgZiwgdnAsIGw7CiAgICBkb3VibGUgYmV0YSwgdGFuX2JsOwogICAgZG91YmxlIFJpbiwgWGluOwogICAgLy8g5aSN5pWw6L+Q566X5Lit6Ze05Y+Y6YeP77yI5YiG5a2QL+WIhuavjeeahOWunumDqOOAgeiZmumDqO+8iQogICAgZG91YmxlIE5fcmVhbCwgTl9pbWFnLCBEX3JlYWwsIERfaW1hZywgZGVub21pbmF0b3I7CgogICAgLy8g5qCH6aKYCiAgICBwcmludGYoIuS8oOi+k+e6v+i+k+WFpemYu+aKl+iuoeeul+WZqFxuIik7CiAgICBwcmludGYoIi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLVxuIik7CgogICAgLy8g55So5oi36L6T5YWlCiAgICBwcmludGYoIuivt+i+k+WFpeeJueaAp+mYu+aKlyBaMO+8iOasp+Wnhu+8ie+8miIpOwogICAgc2NhbmYoIiVsZiIsICZaMCk7CgogICAgcHJpbnRmKCLor7fovpPlhaXotJ/ovb3nlLXpmLsgUkzvvIjmrKflp4bvvInvvJoiKTsKICAgIHNjYW5mKCIlbGYiLCAmUkwpOwoKICAgIHByaW50Zigi6K+36L6T5YWl6LSf6L2955S15oqXIFhM77yI5qyn5aeG77yJ77yaIik7CiAgICBzY2FuZigiJWxmIiwgJlhMKTsKCiAgICBwcmludGYoIuivt+i+k+WFpemikeeOhyBm77yI6LWr5YW577yJ77yaIik7CiAgICBzY2FuZigiJWxmIiwgJmYpOwoKICAgIHByaW50Zigi6K+36L6T5YWl55u46YCf5bqmIHZw77yI57GzL+enku+8ie+8miIpOwogICAgc2NhbmYoIiVsZiIsICZ2cCk7CgogICAgcHJpbnRmKCLor7fovpPlhaXkvKDovpPnur/plb/luqYgbO+8iOexs++8ie+8miIpOwogICAgc2NhbmYoIiVsZiIsICZsKTsKCiAgICAvLyAxLiDorqHnrpfnm7jkvY3luLjmlbAgYmV0YQogICAgYmV0YSA9ICgyICogUEkgKiBmKSAvIHZwOwoKICAgIC8vIDIuIOiuoeeulyB0YW4oYmV0YSAqIGwpCiAgICB0YW5fYmwgPSB0YW4oYmV0YSAqIGwpOwoKICAgIC8vIDMuIOS4peagvOaMieeFp+S8oOi+k+e6v+WFrOW8j++8jOWxleW8gOWkjeaVsOi/kOeulwogICAgLy8g5YWs5byP77yaWmluID0gWjAgKiAoWjAgKyBqKlpMKnRhbs6ybCkgLyAoWkwgKyBqKlowKnRhbs6ybCnvvIxaTD1STCtqWEwKICAgIC8vIOWIhuWtkO+8mlowICsgaiooUkwralhMKSp0YW7OsmwgPSAoWjAgLSBYTCp0YW7OsmwpICsgaiooUkwqdGFuzrJsKQogICAgTl9yZWFsID0gWjAgLSBYTCAqIHRhbl9ibDsKICAgIE5faW1hZyA9IFJMICogdGFuX2JsOwogICAgLy8g5YiG5q+N77yaKFJMK2pYTCkgKyBqKlowKnRhbs6ybCA9IFJMICsgaiooWEwgKyBaMCp0YW7OsmwpCiAgICBEX3JlYWwgPSBSTDsKICAgIERfaW1hZyA9IFhMICsgWjAgKiB0YW5fYmw7CgogICAgLy8gNC4g5aSN5pWw6Zmk5rOV6K6h566X6L6T5YWl6Zi75oqXCiAgICBkZW5vbWluYXRvciA9IERfcmVhbCAqIERfcmVhbCArIERfaW1hZyAqIERfaW1hZzsgLy8g5YiG5q+N5qih55qE5bmz5pa5CiAgICBSaW4gPSBaMCAqIChOX3JlYWwgKiBEX3JlYWwgKyBOX2ltYWcgKiBEX2ltYWcpIC8gZGVub21pbmF0b3I7IC8vIOi+k+WFpemYu+aKl+WunumDqAogICAgWGluID0gWjAgKiAoTl9pbWFnICogRF9yZWFsIC0gTl9yZWFsICogRF9pbWFnKSAvIGRlbm9taW5hdG9yOyAvLyDovpPlhaXpmLvmipfomZrpg6gKCiAgICAvLyDovpPlh7rnu5PmnpwKICAgIHByaW50ZigiXG4tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1cbiIpOwogICAgcHJpbnRmKCLnm7jkvY3luLjmlbAgYmV0YSA9ICUuNGYg5byn5bqmL+exs1xuIiwgYmV0YSk7CiAgICBwcmludGYoInRhbihiZXRhKmwpID0gJS40ZlxuIiwgdGFuX2JsKTsKICAgIHByaW50Zigi6L6T5YWl6Zi75oqXIFppbiA9ICUuNGYgIiwgUmluKTsKICAgIGlmIChYaW4gPj0gMCkgewogICAgICAgIHByaW50ZigiKyBqICUuNGYg5qyn5aeGXG4iLCBYaW4pOwogICAgfSBlbHNlIHsKICAgICAgICBwcmludGYoIi0gaiAlLjRmIOasp+WnhlxuIiwgLVhpbik7CiAgICB9CgogICAgLy8g5Liq5Lq65L+h5oGvCiAgICBwcmludGYoIlxu6K6h566X6ICF77ya5L2g55qE5aeT5ZCNXG4iKTsKICAgIHByaW50Zigi5a2m5Y+377ya5L2g55qE5a2m5Y+3XG4iKTsKCiAgICByZXR1cm4gMDsKfQo=