A=0
For i= 1 to 5 do
A:=A-i
-Tính số vòng lặp
-Tính A
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.
I. Nội qui tham gia "Giúp tôi giải toán"
1. Không đưa câu hỏi linh tinh lên diễn đàn, chỉ đưa các bài mà mình không giải được hoặc các câu hỏi hay lên diễn đàn;
2. Không trả lời linh tinh, không phù hợp với nội dung câu hỏi trên diễn đàn.
3. Không "Đúng" vào các câu trả lời linh tinh nhằm gian lận điểm hỏi đáp.
Các bạn vi phạm 3 điều trên sẽ bị giáo viên của Online Math trừ hết điểm hỏi đáp, có thể bị khóa tài khoản hoặc bị cấm vĩnh viễn không đăng nhập vào trang web.
Dấu | Kiểu gõ VNI | Kiểu gõ TELEX |
sắc | 1 | s |
huyền | 2 | f |
hỏi | 3 | r |
ngã | 4 | x |
nặng | 5 | j |
dấu mũ trong â, ê, ô | 6 | aa, ee, oo |
dấu móc trong ư, ơ | 7 | w |
dấu móc trong chữ ă | 8 | w |
chữ đ | 9 | dd |
xóa dấu | 0 | z |
program in_xau;
uses crt;
var i:integer;
st1,st2:string;
begin
clrscr;
write('nhap xau:');readln(st1);
st2:='';
i:=length(st1);
while i>=1 do
begin
st2:=st2+st1[i];
i:=i-1;
end;
write(st2);
readln;
end.
Tác dụng của các nút lệnh đó là :
B : Để tạo chữ đậm
I : Để tạo chữ in nghiêng
U : Để tạo chữ có dấu gạch ngang dưới chân
số vòng lặp = 5
A = -15