program andanh;
uses crt;
var tong,laixuat:real;
tien:longint;
thang,i:integer;
begin
clrscr;
write('So tien gui: ');readln(tien);
write('Lai xuat moi thang(%): ');readln(laixuat);
write('So thang gui: ');readln(thang);
tong:= tien;
for i:= 2 to thang do
tong:= tong + (tong / 100 * laixuat);
writeln('So tien nhan duoc sau khi gui: ',tong:0:1);
readln
end.
viết chương trinh trên gửi ngân hàng với số tiền gửi,lãi suất,số tháng nhập từ bàn phím.Dự kiến các biến và chạy chương trình
viết chương trình tính tiền gửi ngân hàng với số tiền gửi,lãi suất,số tháng nhập từ bàn phím.Dự kiến các biến và chạy chương trình
Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím với điều kiện chỉ được dùng 2 biến
viết chương trình thực hiện việc giảm giá cho 1 hiệu sách nếu tổng số tiền lớn hơn 100.000đ thì giảm 10% dưới 100.000đ thì giảm 5%.với tổng số tiền nhập từ bàn phím
Viết chương trình Pascal, để nhập vào 2 số nguyên từ bàn phím. Tính tổng của 2 số đó.
(mọi người giúp em làm trên pascal với)
viết chương trình in ra màn hình các số hoàn hảo trong khoảng từ 1 đến N Với N nguyên dương nhập từ bàn phím
viết chương trình in ra màn hình các số hoàn hảo trong khoảng từ 1 đến N Với N nguyên dương nhập từ bàn phím
viết chương trình in ra màn hình các số hoàn hảo trong khoảng từ 1 đến N Với N nguyên dương nhập từ bàn phím
Viết chương trình tính tổng n số nguyên tố đầu tiên với n nhập từ bàn phím
