Bạn ơi hai lệnh này xuất ra màn hình đều là 5;7 vì trong pascal ko phân biệt chữ hoa và chữ thường
Lập trình đơn giản
Các câu hỏi tương tự
Cho biết lệnh xuất ra màn hình sau sẽ xuất ra điều gì?
Write (2+3);Write('2+3');Write(2+3;'2+3');
Write('2+3',2+3);
Giúp e với các anh,chị
Mai e kỳ 1t rồi
Câu 1: Để in ra màn hình 2 dòng chữ như sau, thì thực hiện đoạn lệnh nào? An qua nho ke trong cay An gao nho ke dam, say, dan, sang.A) Writeln(‘An qua nho ke trong cay’); Write(‘An gao nho ke dam, say, dan, sang.’);B) Write(‘An qua nho ke trong cay’); Writeln(‘An gao nho ke dam, say, dan, sang.’);C) Write(‘An qua nho ke trong cay’); Write(‘An gao nho ke dam, say, dan, sang.’);D) Tất cả đều đúng.Câu 2: Giả sử có khai báo sau, Var a,b:integer; ...
Đọc tiếp
Câu 1: Để in ra màn hình 2 dòng chữ như sau, thì thực hiện đoạn lệnh nào?
An qua nho ke trong cay
An gao nho ke dam, say, dan, sang.
A) Writeln(‘An qua nho ke trong cay’);
Write(‘An gao nho ke dam, say, dan, sang.’);
B) Write(‘An qua nho ke trong cay’);
Writeln(‘An gao nho ke dam, say, dan, sang.’);
C) Write(‘An qua nho ke trong cay’);
Write(‘An gao nho ke dam, say, dan, sang.’);
D) Tất cả đều đúng.
Câu 2: Giả sử có khai báo sau,
Var a,b:integer;
tinh:real;
thì phép gán nào là hợp lệ?
A) a:=5.3; B) b:= 3.0; C) tinh:=2; D) a:=b+tinh;
Câu 3: Giả sử có khai báo sau,
Var X, Y, Z:integer;
Và có giá trị lần lượt là X:= 2; Y:= 6; Z:= 3;
Thì phép gán nào dưới đây không hợp lệ?
A) X:= Y + Z; B) X:= Y –Z; C) X:= Y*Z; D) X:= Y/Z;
Câu 4: X có kết quả bao nhiêu sau khi thực hiện đoạn lệnh sau:
Y:= 345;
X:= Y mod 10 + Y div 10 + Y div 100;
A) 5 B) 42 C) 12 D) 39
Câu 5: Để chạy chương trình, sử dụng tổ hợp phím nào?
A) Alt + F9 B) Ctrl + F9 C) Alt + F5 D) F9
Câu 6: Điều kiện sau là đúng hay sai?
X:=6;
If X mod 2 = 3 then
X:=6;
A. Đúng B. Sai
Câu 7: Điều kiện sau là đúng hay sai?
X:=7;
If (X mod 3 =1) and (X div 5 =1) then
X:=7;
A. Đúng B. Sai
Câu 8: Điều kiện sau là đúng hay sai?
X:=4; Y:=3;
If ((X=Y) Or (X<0)) And (Y>X) then
Y:=3;
A. Đúng B. Sai
Câu 9: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=3;
If X>0 then X:=X-1;
If X>1 then X:=X+2;
A. 2 B. 3 C.4 D. 5
Câu 10: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=7; Y:=3;
If X mod 3= Y then X:=X-Y
Else X:=X+Y;
If X<Y then X:=Y-X
Else
X:=X+X;
A. 0 B. 6 C. -7 D. 20
Với M:=7 câu lệnh if m>7 then write(m) else write(8); in ra giá trị nào
Cho giá trị biến a=5. Hãy cho biết kết quả câu lệnh sau đây:IF a<=10 THEN write(a*a) ELSE (a); *
bài 1: viết cú pháp và nêu ý nghĩa của các câu lệnh sau:
if....then...
if....then...else
for..do
while...do
bài 2: cho biết ý nghĩa của các cau lệnh sau:
a, write ( c )
b, write ( c )
c, write ( 5+7 )
d, write ( 5+7 )
e, var i, k : real
clrscr
bài 3: hãy cho biết dữ liệu trên màn hình khi thực hiện đoạn chương trình sau:
C [ 1 ] : 6 ; C [ 2 ] : 9 ; T: 0;
write ( C [ 1 ] + C [ 2 ] , T + C [ 1 ] + C [ 2 ] );
for i: 1 to 3 do write ( T : 3 );
while T 10 do
begin...
Đọc tiếp
bài 1: viết cú pháp và nêu ý nghĩa của các câu lệnh sau:
if....then...
if....then...else
for..do
while...do
bài 2: cho biết ý nghĩa của các cau lệnh sau:
a, write ( c )
b, write ( ' c ' )
c, write ( 5+7 )
d, write ( ' 5+7' )
e, var i, k : real
clrscr
bài 3: hãy cho biết dữ liệu trên màn hình khi thực hiện đoạn chương trình sau:
C [ 1 ] := 6 ; C [ 2 ] := 9 ; T:= 0;
write ( ' C [ 1 ] + C [ 2 ] = ' , T + C [ 1 ] + C [ 2 ] );
for i:= 1 to 3 do write ( T : 3 );
while T < 10 do
begin
T = 6+7*7+6+T
T:=11
writeln ( T );
end;
bài 4: viết chương trình thực hiện công việc sau
a, nhập n số nguyên từ bàn phím
b, hiển thị dáy vừa nhập
c, tính trung bình cộng của dãy số đó
d, hiển thị số nguyên lớn nhất và vị trí của nó
Câu lệnh nào sai và sai ở đâu:
a. for i:=10 to 2 do write (A);
b. for i:=15 to 5 do write (A);
c. while (n mod 2<>0) do i:= 1+1
Câu 7: Trong Pascal, câu lệnh nào sau đây là đúng?
A. S:=1; while s<10 do S:=S+i; i:=i+1;
B. i:=0; S:=1;While S<10 do write(S);
C. n:=2; while n<5 do write(‘A’);
D. Cả A và B.
giải thích thật rõ là sai chỗ nào, cho hỏi lặp cô hạn có cho là sai k
cảm ơn các bạn
Trong bài học câu lệnh in ra màn hình 50 dấu sao là: *
1 điểm
for i:= 1 to 50 do writeln(‘*’);
for i:= 1 to 50 do write(‘*’);
for j:= 1 to 50 do write(‘*’);
for j:= 0 to 50 do write(‘*’);
Xem chi tiết
1.
For I 2 to 12 Do write (O), câu lệnh in ra bao nhiêu chữ O?
2.
For I 1 to 20 Do If (...) Then write (I,);
chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là?
3.
để tính tổng 1 + 2 + ... + 100 ta thực hiện For I 1 to 100 Do S:......
... cần điền?
4.
S;0; For I:4 to 12 Do If (I mod 121) Then S:S +I;
giá trị của S?
5.
S;0; For I:1 to 5 Do S:S +I;
giá trị của S?
6.
For I 1 to 10 Do If (I mod 3 0) Then write (I,);
kết quả?
7.
a: 354 If (a mod 3 0) them write (a...
Đọc tiếp
1.
For I = 2 to 12 Do write ('O'), câu lệnh in ra bao nhiêu chữ O?
2.
For I = 1 to 20 Do If (...) Then write (I,'');
chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là?
3.
để tính tổng 1 + 2 + ... + 100 ta thực hiện For I = 1 to 100 Do S:=......
... cần điền?
4.
S;=0; For I:=4 to 12 Do If (I mod 12=1) Then S:=S +I;
giá trị của S?
5.
S;=0; For I:=1 to 5 Do S:=S +I;
giá trị của S?
6.
For I = 1 to 10 Do If (I mod 3 = 0) Then write (I,'');
kết quả?
7.
a:= 354 If (a mod 3 = 0) them write (a mod 3) Else Write (a Div 3);
kết quả?
8.
để in ra màn hình 20 chữ C cần thực hiện?