Program Nhap;
Uses Crt;
Var N: Integer;
Begin
Repeat
writeln('Nhap N:'); Readln(N);
until N=-1;
write('CT ket thuc');
readln
End.

1,1, va 2 , tick nha

S=9

d

Var S,N,i:Integer;
begin
Write('Nhap N='); Readln(N);
S:=0;
i:=0;
While S<=N do
begin
i:=i+1;
S:=S+i;
End;
Writeln('S=',S);
Readln
End.

Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím:

A. Ctrl + F9

B. Alt + F9

C. Alt + F3

D. Alt + X

Một đoạn dây dẫn đặt trong một từ trường đều có cảm ứng từ 0,35T. Khi dòng điện cường độ 14,5A chạy qua đoạn dây dẫn, thì đoạn dâv dẫn này bị tác dụng một lực từ bằng 1,65N. Biết hướng của dòng điện hợp với hướng của từ trường một góc 30 độ. Tính độ dài của đoạn dây dẫn đặt trong từ trường.

A. 0,45m

B. 0,25m

C. 0,65m

D. 0,75m