Question

Câu 1 :Đoạn lệnh sau đây làm nhiệm vụ gì ?
For := 1 to 5 do
Write ('A')
Câu 2 : Tìm lỗi sai trong chương trình sau :
Var : i : real
Begin :
For i := 1 to 100 do
End
Câu 3 : Viết chương trình in ra màn hình tổng của n số tự nhiên đầu tiên ( N nhập từ bàn phím )
#Helpme ?

Answer 1

Câu 1:

Đoạn lệnh trên thực hiện in 5 lần chữ A ( thiếu dấu ; thì đoạn lệnh trên ko chạy được . đề bị thiếu? )

Câu 2 :

Var :(sau var là khai báo biến ko phải dấu :) i : real (thiếu dấu ; )
Begin : (sau begin ko phải là dấu :)
For i := 1 to 100 do
End (sau end là dấu .)

Câu 3:

var A,n.i : integer ;

begin

write('nhap gia tri n:'); readln(n);

for i:=1 to n do A:=A+i;

write('Tong la',A);

readln

end.