Huy Bách Hoàng
01/01/1970
| Số câu hỏi | 0 |
| Số câu trả lời | 4 |
| Điểm | 20 |
| Kết bạn | |
Bạn bè (0)
Hoạt động gần đây (4)
-
Huy Bách Hoàng đã trả lời trong câu hỏi: 1 . viết chương trình tính tổng từ a đến b 2 . viết chương trình tính tổng từ 4 đến h 3 . viết chương trình tính tích từ 1 đến m 4 . viết chương trình tính số lẻ từ 1 đến n 5 . viết chương trình tính tích từ 1 đến n 6 . viết chương trình kiểm tra xem số đó có phải là số dương hay không 7 . viết chương trình kiểm tra xem số đó có chia hết cho 3 và 5 hay không Cách đây 5 năm
1.
program tongab;
uses crt;
var a,b,s:real;
i:integer;
begin
s:=0
writeln('nhap hai so a,b cach nhau boi dau cach');readln(a,b);
for i:=a to b do
begin
s:=s+i;
end;
writeln('tong cac so tu a den b la ',s:2:2);
readln;
end.
2.
program tong4h;
uses crt;
var h,s:real;
i:integer;
begin
writeln('nhap so cuoi cung cua day bat dau tu 4');readln(h);
s:=0
for i:=4 to h do
begin
s:=s+i;
end;
writeln('tong la',s:2:2);
readln;
end.
3.
program tongab;
uses crt;
var m,s:real;
i:integer;
begin
s:=0
writeln('nhap so cuoi cung cua day tinh tu 1');readln(m);
for i:=1 to m do
begin
s:=s*i;
end;
writeln('tong la',s:2:2);
readln;
end.
4. mình không hiểu lắm tính số lẻ là sao
5. tương tự chương trình câu 3
6.
program tongab;
uses crt;
var a:real;
begin
writeln('nhap so can xac dinh');readln(a);
if a>0 then writeln('day la so duong') else writeln('khong phai nha');
readln;
end.
7.
program tongab;
uses crt;
var n:integer;
begin
writeln('nhap so can xac dinh');readln(n);
if n mod 5=0 then writeln(' so nay chia het cho 5') else writeln('ko chia het cho 5');
if n mod 3 = 0 then writeln('so nay chia het cho 3') else writeln('ko chia het cho 3');
readln;
end.
-
Huy Bách Hoàng đã trả lời trong câu hỏi: Hãy nêu ý nghĩa của các câu lệnh sau: a. X:=X+5 b. S:=A*A Cách đây 5 năm
a. giá trị của X mới là X cũ cộng thêm 5
b. giá trị của s được gán là bình phương của A
-
Huy Bách Hoàng đã trả lời trong câu hỏi: Viết chương trình và so sánh 1/ Viết chương trình nhập vào 2 biến a,b từ bàn phím sau đó in ra màn hình hai biến a,b. 2/ Co biết sự khác nhau giữa từ khoá và tên, cho biết cách đặt tên trong chương trình. Cách đây 5 năm
1/Chương trình:
program ninja247;
uses crt;
var a,b:real;
begin
writeln('nhap 2 so a va b');readln(a,b);
writeln('a=',a);
writeln('b=',b);
readln;
end.
2/ từ khóa là nó có sẵn trong phần mềm rồi còn tên là do mình đặt ra.
tên thì có nhiều lắm
VD: Tên chương trình: Program hoidap;
Tên biến: var a,b,c:longint;
x,y,z:real;
apple,samsung,huawei:string;
Tên hằng: const PI=3,14;
.............
-
Huy Bách Hoàng đã trả lời trong câu hỏi: Mọi người giúp mình vs Cách đây 5 năm
program gi_cung_duoc;
uses crt; {không cần thiết}
var n:integer;
begin
writeln('nhap nam sinh cua ban');readln(n);
writeln('NAM SINH ',2006);
readln; {nếu muốn xem kết quả in ra không thích xem thì bỏ dòng này cũng được}
end.
