Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
********************************************************
--Lệnh write và write cùng là lệnh xuất dữ liệu ra màn hình nhưng lệnh writeln thì in dữ liệu ra màn hình hình rồi đưa con trỏ xuống dòng còn write thì không đưa con trỏ xuống dòng
--Lệnh readln và read cùng là lệnh đọc giá trị của 1 biến nào đó nhưng lệnh readln đọc rồi đồng thời cũng đưa con trỏ xuống dòng còn read thì không đưa con trỏ xuống dòng
Program HOC24;
var i,n,s: integer;
begin
writeln('Chuong trinh tinh tong S = 1 + 2 +3 +...+ n');
write('Nhap so n;'); readln(n);
s:=0; i:=1;
while i<n do
begin
s:=s+i;
i:=i+1;
end;
writeln('Tong cua ',n,' so tu nhien dau tien s = ',s);
readln
end.
uses crt;
var i,n,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
i:=0;
while i<=n do
begin
i:=i+1;
s:=s+i;
end;
writeln(s);
readln;
end.
- Sự khác nhau giữa thủ tục chuẩn đưa dữ liệu ra màn hình Write và Writeln là:
+ Với thủ tục write() sau khi đưa kết quả con trỏ ở cuối dòng văn bản
+ Thủ tục writeln() sau khi đưa kết quả con trỏ chuyển xuống đầu dòng tiếp theo
"Ln" trong ReadLn() hoặc WriteLn() là viết tắt của Line, nghĩa là xong lệnh đó thì xuống dòng.
+thứ nhất, chỗ S:=a*b bạn thiếu ";"
+thứ hai, chỗ readln trước "end." thì ko đc thêm ";" vào sau "readln"
Ctrl + F9 : Chạy chương trình.
Alt + F9 : Dịch chương trình.
Write/Writeln : In kết quả ra màn hình nền.
Read/Readln : Dừng để xem kết quả trên màn hình nền.