Viết chương trình nhập vào 3 số tự nhiên từ bàn phím theo hàng ngang các số cách nhau 1 dấu cách đưa ra bội số chung nhỏ nhất của 3 số đó

Do mình không biết bạn sài ngôn ngữ nào, nhưng mình thấy bạn đăng ở mục lớp 10 nên mình nghĩ có thể là python,pascal hoặc C++. Mình gửi bạn cả 3 bản nhé.

C++ :

#include <iostream>
#include <sstream>

using namespace std;

int TimUocChungLonNhat(int a, int b) {
    while (b != 0) {
        int temp = b;
        b = a % b;
        a = temp;
    }
    return a;
}

int TimBoiSoChungNhoNhat(int a, int b) {
    return (a * b) / TimUocChungLonNhat(a, b);
}

int TimBoiSoChungNhoNhat3So(int a, int b, int c) {
    int boiSoAB = TimBoiSoChungNhoNhat(a, b);
    int boiSoABC = TimBoiSoChungNhoNhat(boiSoAB, c);
    return boiSoABC;
}

int main() {
    int a, b, c;
    cin >> a >> b >> c;

    int boiSoChung = TimBoiSoChungNhoNhat3So(a, b, c);

    cout << boiSoChung << endl;

    return 0;
}

Python:

def tim_uoc_chung_lon_nhat(a, b):
    while b != 0:
        a, b = b, a % b
    return a

def tim_boi_so_chung_nho_nhat(a, b):
    return (a * b) // tim_uoc_chung_lon_nhat(a, b)

def tim_boi_so_chung_nho_nhat_3_so(a, b, c):
    boi_so_ab = tim_boi_so_chung_nho_nhat(a, b)
    boi_so_abc = tim_boi_so_chung_nho_nhat(boi_so_ab, c)
    return boi_so_abc

a, b, c = map(int, input().split())
boi_so_chung = tim_boi_so_chung_nho_nhat_3_so(a, b, c)
print(boi_so_chung)

Pascal:


program BoiSoChungNhoNhat;

function TimUocChungLonNhat(a, b: Integer): Integer;
var
  temp: Integer;
begin
  while b <> 0 do
  begin
    temp := b;
    b := a mod b;
    a := temp;
  end;
  TimUocChungLonNhat := a;
end;

function TimBoiSoChungNhoNhat(a, b: Integer): Integer;
begin
  TimBoiSoChungNhoNhat := (a * b) div TimUocChungLonNhat(a, b);
end;

function TimBoiSoChungNhoNhat3So(a, b, c: Integer): Integer;
var
  boiSoAB, boiSoABC: Integer;
begin
  boiSoAB := TimBoiSoChungNhoNhat(a, b);
  boiSoABC := TimBoiSoChungNhoNhat(boiSoAB, c);
  TimBoiSoChungNhoNhat3So := boiSoABC;
end;

var
  a, b, c, boiSoChung: Integer;
begin
  ReadLn(a, b, c);
  boiSoChung := TimBoiSoChungNhoNhat3So(a, b, c);
  WriteLn(boiSoChung);
end.