Nội dung của Bài 7: Các thủ tục vào/ra đơn giản dưới đây, chúng ta sẽ cùng nhau tìm hiểu về ý nghĩa của các thủ tục vào/ra chuẩn đối với lập trình và cấu trúc chung của thủ tục vào/ra trong ngôn ngữ lập trình Pascal. Mời các em cùng theo dõi nội dung chi tiết của bài học.
Việc nhập dữ liệu từ bàn phím được thực hiện bằng thủ tục chuẩn:
Read (< danh sách biến vào >); Hoặc Readln (< danh sách biến vào >);
Trong đó: Danh sách biến vào là một hoặc nhiều tên biến đơn. Trong trường hợp nhiều biến thì các tên biến được viết cách nhau bởi dấu phẩy.
Ví dụ 1:
Chú ý 1:
Việc đưa dữ liệu ra màn hình trong Pascal sử dụng thủ tục chuẩn:
Write(< danh sách kết quả ra>); Hoặc Writeln(< danh sách kết quả ra >);
Trong đó: Danh sách kết quả ra có thể là tên biến đơn, biểu thức hoặc hằng.
Chú ý 2:
Ví dụ 2:
Để nhập giá trị cho biến M từ bàn phím, người ta thường dùng cặp thủ tục:
write ('Hay nhap gia tri cua M: ')
readln (M);
Để chương trình được sử dụng một cách thuận tiện, khi nhập giá trị từ bàn phím cho biến, ta nên có thêm xâu kí tự nhắc nhở việc nhập giá trị cho biến nào, kiểu dữ liệu gì,...
Chú ý 3:
Ví dụ 3:
Xét các ví dụ sau:
Ví dụ 1:
Write(‘Lop 11A’);
Write(‘ rat ngoan’);
=> Kết quả tương ứng:
Ví dụ 2:
Writeln(‘Lop 11A’);
Writeln(‘rat ngoan’);
=> Kết quả tương ứng:
Ví dụ 3:
Write(‘Lop 11A’); writeln;
Write(‘rat ngoan’);
=> Kết quả tương ứng:
Em hãy quan sát và cho biết sự khác nhau giữa 2 thủ tục Write và Writeln về vị trí của con trỏ?
Gợi ý làm bài:
Sau khi học xong Bài 7: Các thủ tục vào/ra đơn giản các em cần ghi nhớ các nội dung:
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 11 Bài 7 cực hay có đáp án và lời giải chi tiết.
Đoạn chương trình sau sẽ hiển thị kết quả:
Begin
Writeln ('Day la lop TIN HOC');
End.
Cú pháp của thủ tục nhập dữ liệu vào từ bàn phím:
Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?
Câu 4-10: 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 11 DapAnHay
Đoạn chương trình sau sẽ hiển thị kết quả:
Begin
Writeln ('Day la lop TIN HOC');
End.
Cú pháp của thủ tục nhập dữ liệu vào từ bàn phím:
Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?
Cho x là biến thực đã được gán giá trị 12.41235. Để thực hiện lên màn hình nội dung “x=12.41” cần chọn câu lệnh nào sau đây?
Trong ngôn ngữ lập trình Pascal, với câu lệnh như sau (a là một biến kiểu số thực):
a :=2345 ;
Writeln('a = ', a:8:3);
Sẽ ghi ra màn hình?
Để nhập giá trị cho 2 biến a và b ta dùng lệnh:
Cú pháp của thủ tục xuất dữ liệu ra màn hình:
Cho x là biến đã khai báo kiểu thực. Sau khi thực hiện hai câu lệnh sau :
X:= 10;
Writeln (x:7:2);
thì kết quả dạng nào sẽ xuất hiện trên màn hình trong những dạng kết quả sau ?
Để in giá trị lưu trong 2 biến a và b ra màn hình ta dùng lệnh:
Trong ngôn ngữ lập trình Pascal, với câu lệnh như sau (a là một biến kiểu số thực):
a :=2345 ;
Writeln('a = ', a:8:3);
Sẽ ghi ra màn hình?
Họ và tên
Tiêu đề câu hỏi
Nội dung câu hỏi
Câu trả lời của bạn
Viết chương trình nhập vào điểm Toán, Văn, Anh và đối tượng chính sách thuộc nhóm từ 1 đến 9. Nếu đối tượng từ 1 đến 3 thì được cộng thêm 1 điểm, đối tượng từ 4 đến 6 thì được cộng thêm 0.5 còn lại không được cộng. Nhập vào điểm trúng tuyển. Sau đó in ra kết quả tổng điểm, và trúng tuyển hay không trúng tuyển! Giúp em với ạ mai em thi rồi ạ!
Câu trả lời của bạn
Câu 5: Cho biết kết quả của đoạn chương trình
sau?
N:=5; Tong:=0;
For i:=1 to n do
If (i mod 2=0) then Tong:-Tong +i:
Write(Tong):
Câu trả lời của bạn
Câu trả lời của bạn
uses crt;
var i:integer;
begin
clrscr;
for i:=1 to 100 do
if i mod 2=1 then write(i:4);
readln;
end.
Câu trả lời của bạn
#include <bits/stdc++.h>
using namespace std;
int n;
int main()
{
cin>>n;
int dv=n%10;
int ch=n/10; ch=ch%10;
int tr=n/100;
cout<<dv+ch+tr;
return 0;
}
Câu trả lời của bạn
program bai_tap;
uses crt;
var i:byte;
begin
clrscr;
for i:= 1 to 10 do
writeln('em hua se no luc het minh ');
readln
end.
Câu trả lời của bạn
var
a,b:integer;
begin
write(' nhap a va b: '); readln(a,b);
writeln(a);
write(b);
readln;
end.
Câu trả lời của bạn
Program so_chinh_phuong;
uses crt;
Var n,x: integer;
BEGIN
clrscr;
write('Nhap so can kiem tra: n = ');
readln(n);
x:=trunc(sqrt(n);
IF sqr(x)=n then write(n,'la so chinh phuong);
ELSE write(n,' khong phai la so chinh phuong.');
readln;
END.
Câu trả lời của bạn
program hotrotinhoc;
var s: string;
begin
write('Nhap ki tu :'); readln(s);
s:=chr(ord(s)+32);
write(s);
readln
end.
Câu trả lời của bạn
uses crt;
var st:string;
i,j,n,d,x,y:integer;
kq,lt:longint;
begin
clrscr;
write('nhap so nhi phan:'); readln(st);
d:=length(st);
kq:=0;
for i:=1 to d do
begin
lt:=1;
for j:=1 to d-i do
lt:=lt*2;
val(st[i],x,y);
kq:=kq+x*lt;
end;
writeln(st,' doi sang he 10 la: ',kq);
readln;
end.
Câu trả lời của bạn
Kết quả của x thuộc dạng: Số thập phân
Kết quả của x là: 10,00
Tên thủ tục chuẩn | Chức năng |
1. Thủ tục read(<danh sách biến>); | a. Nhập dự liệu từ bàn phím vào cho danh sach biến |
2. Thủ tục read(<biến tệp>,<danh sách biến>); | b. Đọc dữ liệu từ tệp ra danh sách biến |
3. Thủ tục write(<biến tệp>,<danh sách kết quả>); | c. Ghi ( đưa ) dạn sách kết quả vào tệp |
4. Thủ tục write(<danh sách kết quả>); | d. Đưa ra màn hình danh sách kết quả |
5. Thủ tục close(<biến tệp>); | e. Đóng tệp đã mở |
6. Thủ tục assign(<biến tệp>,<tên tệp>); | f. Gắn tên tệp với đại diện của nó(là 1 biến tệp) |
7. Thủ tục reset(<biến tệp>); | g. Mở tệp để đọc dữ liệu ra |
8. Thủ tục rewrite(<biến tệp>) | h. Mở tệp để ghi dữ liệu vào |
Câu trả lời của bạn
1-a
2-b
3-c
4-d
5-e
6-f
7-g
8-h
z = \(\left|1-x^2\right|+\left|1-y^2\right|\)
z = \(\left|1-e^x\right|+\left|1-e^y\right|\)
Câu trả lời của bạn
uses crt;
var x,y,z:real;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
z:=abs(1-sqr(x))+abs(1-sqr(y));
writeln('Z=',z:4:2);
readln;
end.
Câu trả lời của bạn
var a,b,c,p,s: real;
begin
writeln('NHAP BA CANH TAM GIAC: ');
repeat
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
until (a+b>c) and (b+c>a) and (c+a>b);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Chu vi tam giac: ',2*p:5:2);
writeln('Dien tich tam giac: ',s:5:2);
writeln('Ban kinh duong tron ngoai tiep: ',a*b*c/(4*s):5:2);
writeln('Ban kinh duong tron noi tiep: ',s/p:5:2);
end.
Câu trả lời của bạn
#include <iostream>
using namespace std;
int main()
{
int M, N;
cin >> M >> N;
cout << "Tong cua hai so la " << M+N << endl;
return 0;
}
Câu trả lời của bạn
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
cout<<n*n;
return 0;
}
Câu trả lời của bạn
#include <bits/stdc++.h>
using namespace std;
string a[100];
int i;
int main()
{
for (i=1; i<=10;i++)
{
cin>>a[i];
}
for (i=1; i<=10; i++);
cout<<a[i]<<endl;
return 0;
}
Begin
Writeln ('Day la lop TIN HOC');
End.
A. 'Day la lop TIN HOC'
B. Không chạy được vì có lỗi
C. Day la lop TIN HOC
D. "Day la lop TINHOC"
Câu trả lời của bạn
Trong Pascal, lệnh Write hoặc Writeln dùng để đưa kết quả ra màn hình và giá trị đó được bao bởi cặp dấu nháy.
Đáp án: A
Câu trả lời của bạn
A. Gõ “Tran Van Thong 7.5” sau đó nhấn Enter;
B. Gõ “Tran Van Thong” sau đó nhấn phím Enter rồi gõ “7.5” sau đó nhấn phím Enter;
C. Gõ “Tran Van Thong 7,5” sau đó nhấn phím Enter;
D. Gõ “Tran Van Thong ” rồi gõ dấu phẩy rồi gõ “7.5” sau đó nhấn phím Enter;
Câu trả lời của bạn
Để nhập giá trị cho từng biến muốn máy tính hiểu ta phải nhấn phím Enter hoặc dấu cách hoặc phím Tab.
Đáp án: B
0 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 *