Viết chương trình nhập vào số nguyên n bất kỳ. Xuất ra trên màn hình kết quả n lần chữ ‘XIN CHAO’ có số thứ tự. Input: n = 4 Output: 1. XIN CHAO 2. XIN CHAO 3. XIN CHAO 4. XIN CHAO
K
Khách
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.
Những câu hỏi liên quan
20 tháng 10 2021
uses crt;
begin
writeln('Xin chao cac ban');
writeln('Moi ban den voi Pascal');
readln;
end.
28 tháng 2 2021
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
for i:=1 to n do
s:=s+i;
writeln(s);
readln;
end.
1 tháng 5 2018
Bạn Phong dùng hai câu lệnh Print [Xin chao] và câu lệnh Show [Xin chao] để đưa dòng chữ ra màn hình, nhưng không được. Câu nào dưới đây giải thích đúng?
A. Lệnh Print và lệnh Show chỉ sử dụng để thay đổi nét bút.
B. Lệnh Print và lệnh Show chỉ sử dụng để vẽ hình.
C. Lệnh Print và lệnh Show chỉ sử dụng để đổi màu.
D. Lệnh Print và lệnh Show chỉ sử dụng để thực hiện các phép toán.
HG
1
1 tháng 5 2021
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
st:='Xin chao!';
d:=length(st);
for i:=1 to d do
st[i]:=upcase(st[i]);
writeln(st);
readln;
end.
27 tháng 3 2018
Câu 1: S = 10
Câu 2: Chữ "xin chao" được in ra màn hình 3 lần
Câu 3:
- For...to...do:
+ Là câu lệnh lặp với số lần lặp biết trước.
+ Điều kiện kết thúc vòng lặp là một số xác định.
- While...do:
+ Là câu lệnh lặp với số lần lặp chưa biết trước.
+ Điều kiện để kết thúc vòng lặp thường là một phép so sánh.
6 tháng 10 2021
Em cũng làm được cái này nhưng hai câu nó không xuống dòng mà nó cứ ra liên tiếp. Giúp e với
uses crt;
var i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
writeln(i,'. XIN CHAO');
readln;
end.