tugas QBASIC

TUGAS Q-BASIC

NAMA : ELDI ROSA

NPM : 32111398

KELAS : 1DB09

1. PENJUMLAHAN

CLS

A = 5

B = 10

C = A + B

PRINT “NILAI A+B =”; C

END

NILAI A+B = 15

2. LUAS SEGITIGA

CLS

A = 5

T = 10

L = .5 * A * T

PRINT "ALAS SEGITIGA = 5"

PRINT "TINGGI SEGITIGA = 10"

PRINT "LUAS SEGITIGA"; L

END

ALAS SEGITIGA = 5

TINGGI SEGITIGA = 10

LUAS SEGITIGA 25

3. LUAS dan KELILING LINGKARAN

CLS

R = 10

K = 2 * 3.14 * R

L = 3.14 * R ^ 2

PRINT "JARI-JARI LINGKARAN = 10"

PRINT "KELILING LINGKARAN"; K

PRINT "LUAS LINGKARAN"; L

END

JARI-JARI LINGKARAN = 10

KELILING LINGKARAN 62.8

LUAS LINGKARAN 314

CLS
REM NAMA = ELDI ROSA

REM NPM = 32111398

REM KELAS = 1DB09