Giấy phép điển hình với phần mềm nguồn mở?

    A. GLU GPL

   B GNU GPN

    C. GLU GPN

     D. GNU GPL

A

khi chúng ta sửa đổi một phần mềm nguồn mở đã áp dụng GPL để tạo ra phần mềm đã sửa đổi. Thì phần mềm đã sửa đổi này cũng phải mở theo giấy phép của GPL.

#python:

ia = 50

ib = 48

ic = ia + ib

print("Giá trị của ic sau khi thực hiện phép tính tổng là:", ic)

#include <iostream>

using namespace std;

int main() {

     int x, y, z;

     cin >> x >> y >> z;

     int total_holes = x / (y + z);

     int max_flowers = total_holes * y;

     cout << max_flowers << endl;

     return 0;

def tinh_tong(n):

    S = 0

    tich = 1

    for i in range(1, n+1):

        tich *= i

        S += ((-1)**(i-1)) * tich**2

    return S

n = int(input("Nhập giá trị của n: "))

tong = tinh_tong(n)

print("Tổng S =", tong)

uses crt;

var ln,a,b,c,d,e:integer;

begin

clrscr;

readln(a,b,c,d,e);

ln:=a;

if ln<b then ln:=b;

if ln<c then ln:=c;

if ln<d then ln:=d;

if ln<e then ln:=e;

write(ln);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

int main () {

int a,b,c,d;

cin >> a >> b >> c >> d;

long long kq = (((a * b) % 100 * c) % 100) * d % 100;

if (kq==0) cout << "YES"; else cout << "No";

return 0;

}

uses crt;

var a:real;

begin

clrscr;

readln(a);

if (a>=9) then write('A')

else if ((7<=a) and (a<9)) then write('B')

else if ((5<=a) and (a<7)) then write('C')

else write('D');

readln;

end.

python
 

diem_tb = float(input("Nhập điểm trung bình của học sinh: "))

if diem_tb >= 9:
    loai = 'A'
elif diem_tb >= 7:
    loai = 'B'
elif diem_tb >= 5:
    loai = 'C'
else:
    loai = 'D'

print("Loại học sinh: ", loai)


Pascal
 

program PhanLoaiHocSinh;
var
  diem_tb: real;
  loai: char;
begin
  write('Nhap diem trung binh cua hoc sinh: ');
  readln(diem_tb);

  if diem_tb >= 9 then
    loai := 'A'
  else if diem_tb >= 7 then
    loai := 'B'
  else if diem_tb >= 5 then
    loai := 'C'
  else
    loai := 'D';

  writeln('Loai hoc sinh: ', loai);
end.

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

if ((a=b) and (b=c)) then write('YES')

else write('NO');

readln;

end.

var a,b,c:int64;

begin

readln(a,b,c);

if (a=b) and (b=c) then write('YES')

else write('NO');

readln;

end.

program XoaSoLienTuc;

uses sysutils;

function XoaSoLienTuc(S: string): string;

var

     i: integer;

     result: string;

begin

     result := '';

     for i := 1 to Length(S) do

     begin

          if not (S[i] in ['0'..'9']) then

          begin

               if (i = 1) or (S[i-1] in ['0'..'9']) then

                    result := result + ' ';

               result := result + S[i];

          end;

     end;

     result := Trim(result);

     result := StringReplace(result, ' ', '', [rfReplaceAll]);

     XoaSoLienTuc := result;

end;

var

     S: string;

begin

     write('Nhập vào xâu S: ');

     readln(S);

     writeln('Kết quả: ', XoaSoLienTuc(S));

end.

không ra bạn ơi