Nội dung của Bài thực hành 3: Khai báo và sử dụng biến dưới đây sẽ giúp các em thực hiện được khai báo đúng cú pháp, lựa chọn được kiểu dữ liệu phù hợp cho biến; kết hợp được giữa lệnh write(), writeln() với read(), readln() để thực hiện việc nhập dữ liệu cho biến từ bàn phím; hiểu về các kiểu dữ liệu chuẩn: kiểu số nguyên, kiểu số thực;.... Mời các em cùng theo dõi nội dung chi tiết của bài thực hành.
Bước đầu làm quen cách khai báo và sử dụng biến trong chương trình.
Các kiểu dữ trong Pascal:
Tên kiểu dữ liệu | Phạm vi giá trị |
integer | Số nguyên trong khoảng từ: -32768 đến 32767 |
real | Số thực trong khoảng từ: 2.9 x 10-39 đến 1.7 x 1038 và số 0 |
char | Kí tự trong bảng chữ cái |
string | Xâu kí tự tối đa gồm 255 kí tự |
Bảng 1. Các kiểu dữ liệu trong Pascal
Var < Danh sách biến > : < Kiểu dữ liệu >;
Ví dụ 1: Var thongbao : String;
soluong: Integer;
dongia, thanhtien: Real;
< Tên biến > := < Biểu thức >;
Ví dụ 2: thongbao := 'So tien phai tra';
soluong := 10;
dongia := 5.5;
thanhtien := soluong * dongia;
Read(tên biến); hoặc Readln(tên biến)
Ví dụ 3: Readln(soluong);
Readln(dongia);
Write(tên biến); hoặc Writeln(tên biến)
Const < Tên hằng > = < Giá trị >;
Ví dụ 4: Const bankinh = 5;
Gợi ý làm bài:
Chương trình:
Program Tinh_Tien;
Uses Crt;
Var soluong: integer;
dongia, thanhtien: real;
thongbao: String;
Const phi= 10000;
Begin
clrscr;
thongbao:= 'Tong so tien phai thanh toan: ';
{nhap don gia va so luong hang}
write('don gia= ‘); readln(dongia);
write(‘so luong= ‘); readln(soluong);
thanhtien:= soluong * dongia + phi;
{In ra so tien phai tra}
writeln(thongbao, thanhtien:10:2);
readln
End.
Gợi ý làm bài:
Chương trình:
Program hoan_doi;
Var x, y, z: Integer;
Begin
clrscr;
Write(‘Nhap x, y : ’);
Read(x,y);
Writeln(‘x=’, x);
Writeln(‘y=’, y);
z:=x;
x:=y;
y:=z;
Writeln(‘x= ’, x);
Writeln(‘y= ’, y);
Readln;
End.
Sau khi học xong Bài thực hành 3: Khai báo và sử dụng biến, các em cần ghi nhớ các nội dung:
1. Cú pháp khai báo biến trong Pascal:
var < danh sách biến >: < kiểu dữ liệu >;
trong đó danh sách biến gồm tên các biến và được cách nhau bởi dấu phẩy.
2. Cú pháp lệnh gán trong Pascal:
< biến > := < biểu thức >;
3. Lệnh read(< danh sách biến >) hay readln(< danh sách biến >), trong đó danh sách biến là tên các biến đã khai báo, được sử dụng để nhập dữ liệu từ bàn phím. Sau khi nhập dữ liệu cần nhấn phím Enter để xác nhận. Nếu giá trị nhập vào vượt quá phạm vi của biến, nói chung kết quả tính toán sẽ sai.
4. Nội dung chú thích nằm trong cặp dấu { và } bị bỏ qua khi dịch chương trình. Các chú thích được dùng để làm cho chương trình dễ đọc, dễ hiểu. Ngoài ra có thể sử dụng cặp các dấu (* và *) để tạo chú thích.
Các em có thể hệ thống lại nội dung kiến thức đã học được thông qua bài kiểm tra Trắc nghiệm Tin học 8 Bài thực hành 3 cực hay có đáp án và lời giải chi tiết.
Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal:
Trong các giá trị sau, giá trị nào thuộc kiểu dữ liệu Boolean:
Câu 3- 5: Mời các em đăng nhập xem tiếp nội dung và thi thử Online để củng cố kiến thức về bài học này nhé!
Trong quá trình học tập nếu có thắc mắc hay cần trợ giúp gì thì các em hãy comment ở mục Hỏi đáp, Cộng đồng Tin học DapAnHay sẽ hỗ trợ cho các em một cách nhanh chóng!
Chúc các em học tập tốt và luôn đạt thành tích cao trong học tập!
-- Mod Tin Học 8 DapAnHay
Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal:
Trong các giá trị sau, giá trị nào thuộc kiểu dữ liệu Boolean:
Program là từ khoá dùng để:
Cấu trúc của chương trình Pascal gồm những phần nào?
Phần nào trong chương trình Pascal bắt buộc phải có?
Họ và tên
Tiêu đề câu hỏi
Nội dung câu hỏi
A. String
B. Integer
C. Real
D. Char
Câu trả lời của bạn
Biến a được nhận các giá trị là 0; -1; 1; 1,3; 5,2 . Ta có thể khai báo a thuộc kiểu dữ liệu nào?
Câu trả lời của bạn
giúp em với ạ
Câu trả lời của bạn
Câu trả lời của bạn
Câu trả lời của bạn
Câu trả lời của bạn
Câu trả lời của bạn
program luyentap;
uses crt;
var S, i: Integer;
var a:array[1..10] of Integer;
begin
S:= 0;
for i:= 1 to 10 Do
begin
write('Nhap so thu ',i,': '); readln(a[i]);
if a[i]>0 then S:= S + a[i];
end;
writeln('Tong cac so lon hon 0 la: ',S);
writeln('Nhan enter de ket thuc');
readln
end.
Bài 1: Nhập vào từ bàn phím, sô nguyên dương N gồm 4 chữ số, yêu cầu kiểm tra chữ số đầu và chữ số cuối (hàng nghìn và hàng đơn vị) nếu chữ số đầu và chữ số cuối là chẵn thì thực hiện tính tổng 2 số đó, nếu chữ đầu hoặc chữ số cuối là lẻ thì thực hiện tính tích 2 số đó
Câu trả lời của bạn
Câu trả lời của bạn
viết chương trình in ra số hoàn chỉnh nhỏ hơn n trong python
Câu trả lời của bạn
viet chuong trinh tim tich P=1*2^2*3*2*......*n^2 voi n la so nguyen duong duoc nhap tu ban phim
Câu trả lời của bạn
program
Bài 1: ROTATION ( Bài tập 3)
Cho một số X (số chữ số của X <=14). Ta gọi số đó là một số xoay khi xoay số X một góc 180 thì ta vẫn được số X. Ví dụ: 11, 69, 96 là những số xoay. Yêu cầu: Khi cho một số K, hãy tìm xem với những số có K chữ số thì có bao nhiêu SỐ xoay và đó là những số nào?
Dữ liệu: vào từ File ROTATION.INP chỉ ghi duy nhất một số nguyên dương K(1<=K<=14).
Kết quả: Xuất ra File ROTATION.OUT mỗi dòng ghi một số thoả mãn. Ví dụ:
ROTATION.INP
2
ROTATION.OUT
11
69
88
96
Câu trả lời của bạn
Câu trả lời của bạn
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.
write hoặc writeln (' ban hay nhap nam sinh=2006' ); readln (2006)
Câu trả lời của bạn
Hãy viết chương trình nhập vào 1 số nguyên. Sau đó thông báo ra màn hình tổng các số của số nguyên đó
Ví dụ: nhập 245
Tổng:11
Câu trả lời của bạn
program tong;
uses crt;
var n,k,s:Longint;
begin clrscr;
write('Nhap so n '); readln(n);
while n<>0 do
begin
k:=n mod 10;
s:=s+k;
n:=n div 10;
end;
write('TONG LA: ',s);
readln
end.
#include <iostream>using namespace std;
// Hãy tính tổng các chữ số của số nguyên dương n
// VD : 123 => 1 2 3 ==> 1 + 2 + 3 = 6
// 5424 ==> 5 4 2 1 ==> 5 + 4 + 2 + 1 = 12
int Sum(int N)
{
int S = 0;
while (N > 0)
{
int t = N % 10;
S = S + t; // Xử lý gì đó
N = N / 10;
}
return S;
}
int main()
{
int N;
cout << "N = ";
cin >> N;
int result = Sum(N);
cout << "Tong = " << result << endl;
system("pause");
}
Câu trả lời của bạn
hàm int nhé bn
program chia;
uses crt;
var c,d,a,b:integer;
begin
clrscr;
write('Nhap so a: '); readln(a);
write('Nhap so b: '); readln(b);
c:=a div b;
d:=a mod b;
writeln('PHEP CHIA LAY PHAN NGUYEN: ',c);
write('PHEP CHIA LAY PHAN DU: ',d);
readln
end.
Câu trả lời của bạn
Xét khai báo biến:
Var
X, Y, Z: real;
C: char;
I, J: byte;
N: word;
Tổng bộ nhớ cần cấp phát (Dựa vào bảng Bộ nhớ lưu trữ một giá trị của các kiểu dữ liệu đã học trong Bài 4: Một số kiểu dữ liệu chuẩn):
Var x, y: Integer;
Z, A, B: Byte;
Const g = 9.8;
Câu trả lời của bạn
var a,S,C:longint;
begin
readln(a);
S:=a*a;
C:=a*4;
Writeln(S); Readln;
Writeln(C); Readln;
End.
program dientich;
uses crt;
var S,a:integer;
begin
writeln('nhap a');
readln(a);
S:=a*a;
writeln('ketqua',S);
readln;
end.
Câu trả lời của bạn
Em hãy khai báo một mảng gồm có Diemtoan,Diemtin gồm 70 phần tử là biến coa kiểu số thực.
Câu trả lời của bạn
khi nào phần khai báo sử dụng khai báo hằng số
khi nào phần khai báo sử dụng khai báo hằng số
Giúp mk vs.. mk dag cần gấp...
2 Bình luận
Để lại bình luận
Địa chỉ email của hạn sẽ không được công bố. Các trường bắt buộc được đánh dấu *