Uses crt;
var n:integer;
Begin
clrscr;
Writeln('Nhap so n= '); Readln(n);
Write('So vua nhap la ',n);
Readln
End.
Đúng 0
Bình luận (0)
Bài 4. Sử dụng biến trong chương trình
Các câu hỏi tương tự
giup minh giai cau nay :Phan viet chuong trinh de nhap tu ban phim 1 cau van X sau do tinh va in ra man hinh so ki tu so tu va so dau cach đếm được tron câu văn đó. Khai báo các biến trong chương trình
cho chương trình sau hãy sắp xếp lại cho đúng
var a,b,c:integer;
c:a+b;
begin
write(nhap gia tri a);
readln(b);
program tong hai so;
end.
write(nhap so b)
readln(a);
clrscr;
readln;
uses crt;
writeln(tong cua hai so vua nhap la:,c)
bạn nào biết thì giúp mình với mai mình kt rồi
Đọc tiếp
cho chương trình sau hãy sắp xếp lại cho đúng
var a,b,c:integer;
c:=a+b;
begin
write('nhap gia tri a);
readln(b);
program tong hai so;
end.
write('nhap so b')
readln(a);
clrscr;
readln;
uses crt;
writeln(tong cua hai so vua nhap la:',c)
bạn nào biết thì giúp mình với mai mình kt rồi
nhap vao chieu dai va chieu rong cua hinh chu nhat tu ban phim. sau do in ra man hinh dien tich va chu vi hinh chu nhat do. luu y lam tron den mot chu so thap phan doi voi chu vi va dien tich
Bạn Tuấn viết chương trình như sau:
program Tinh toan
uses crt;
var
x, y : integer;
tb real;
thongbao : integer;
const a : 2;
begin
clrscr;
thongbao : ‘Trung binh cong cua hai so x va y la: ‘;
write(‘Nhap gai tri cho x ‘); readln(x);
write(‘Nhap gia tri cho y ‘); readln(y);
tb (x+y)/a;
writeln(thongbao, tb:2:1);
readln;
end.
a. Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại c...
Đọc tiếp
Bạn Tuấn viết chương trình như sau:
program Tinh toan
uses crt;
var
x, y : integer;
tb = real;
thongbao : integer;
const a := 2;
begin
clrscr;
thongbao := ‘Trung binh cong cua hai so x va y la: ‘;
write(‘Nhap gai tri cho x = ‘); readln(x);
write(‘Nhap gia tri cho y = ‘); readln(y);
tb = (x+y)/a;
writeln(thongbao, tb:2:1);
readln;
end.
a. Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại cho đúng.
b. Hãy phân biệt tên biến, tên hằng trong chương trình trên.
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Tinh tien;
2. Uses crt
3. ....... soluong,dongia,Tienthanhtoan:integer;
4. ....... Phi1000;
5. ..........
6. Clrscr;
7. write(nhap so luong:);readln(soluong);
8. write(nhap don gia:);readln(dongia);
9. writeln(So tien quy khach phai thanh toan la:,Tienthanhtoan);
10. Tienthanhtoan soluong*dongia+phi;
11. ............
12. End.
giúp mik vs các bạn!
Đọc tiếp
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Tinh tien;
2. Uses crt
3. ....... soluong,dongia,Tienthanhtoan:=integer;
4. ....... Phi=1000;
5. ..........
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
10. Tienthanhtoan = soluong*dongia+phi;
11. ............
12. End.
giúp mik vs các bạn!
Hãy cho biết kiểu dữ liệu của các biến cần khai báo dùng để viết chương trình để giai các bai toàn dưới đây :
a) Tính diện tích S của hình tam giác voi do đài mot cạnh a va chiều cao tương ứng h ( a va h la các số tự nhiên được nhap vào từ bàn phím )
b) Tính kết quả c của phép chia lấy phần nguyên và kết quả d của phép chia lấy phần dư của 2 số nguyên a va b
Cho chương trình sau :( Tính chu vi và diện tích tam giác biết 3 cạnh a,b,c với chiều cao h ứng với cạnh a nhập từ bàn phím )Uses crt;Var a,b,c,h,chuvi,dientich : integer;Beginclrscr;Writeln(Nhap canh a ); Readln(a);Writeln(Nhap canh b ); Readln(b);Writeln(Nhap canh c ); Readln(c);chuvi : a+b+c;dientich : a*h/2Writeln(Chu vi hinh tam giac la , chuvi);Write(Dien tich hinh tam giac la , dientich);Readln;End.Giải thích lý do vì sao chương trình không chạy được.
Đọc tiếp
Cho chương trình sau :
( Tính chu vi và diện tích tam giác biết 3 cạnh a,b,c với chiều cao h ứng với cạnh a nhập từ bàn phím )
Uses crt;
Var a,b,c,h,chuvi,dientich : integer;
Begin
clrscr;
Writeln('Nhap canh a= '); Readln(a);
Writeln('Nhap canh b= '); Readln(b);
Writeln('Nhap canh c= '); Readln(c);
chuvi := a+b+c;
dientich := a*h/2
Writeln('Chu vi hinh tam giac la = ', chuvi);
Write('Dien tich hinh tam giac la = ', dientich);
Readln;
End.
Giải thích lý do vì sao chương trình không chạy được.
viet chuong trinh tinh chu vi dien tich hinh thang co su dung bien
ai lam duoc thi giup minh nhanh len nhe 
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Bai11;
2. ........ crt;
3. ........ a,b,H:integer;
4. ........ c12;
5.Begin
6. Clrscr;
7. write(nhap a); Readln(a);
8. write(nhap b); ...........(b)
9. H:a*a+b*b+c;
10. Readln;
11. Writeln(H,H);
12. .......
Đọc tiếp
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Bai11;
2. ........ crt;
3. ........ a,b,H:integer;
4. ........ c=12;
5.Begin
6. Clrscr;
7. write('nhap a='); Readln(a);
8. write('nhap b='); ...........(b)
9. H:=a*a+b*b+c;
10. Readln;
11. Writeln('H=',H);
12. .......