câu 1: Trình bày thuật toán hoán đổi giá trị x và y
Câu 2: Cho x:= 15
if (28 mod 5) = O then
x:= x+1 else x:= x+5;
tính kết quả ??
Bài toán: Cho x=3, y=7. Hãy viết chương trình hoán đổi giá trị x và y
Câu 1: Xác định bài toán trên
Câu 2: Mô tả thuật toán của bài toán trên
Program hoan_doi;
uses crt;
var x,y,temp:Integer;
begin
x:=3;y:=7;
Writeln('Gia tri cua x truoc khi doi: ',x);
Writeln('Gia tri cua y truoc khi doi: ',y);
temp:=x;
x:=y;
y:=temp;
Writeln('Gia tri cua x sau khi hoan doi: ',x);
Writeln('Gia tri cua y sau khi hoan doi: ',y);
Readln();
end.
Mô tả: Khai báo 3 biến kiểu số nguyên
-Ta gán 3 cho biến x, gán 7 cho biến y
-Sau đó gán giá trị của biến x cho biến temp (để lưu trữ giá trị của biến x);
-Ta gán giá trị của biến y cho biến x (lúc này giá trị của biến x đã bị đổi);
-Rồi gán giá trị của biến temp cho biến y (Giá trị không bị thay đổi theo biến x bởi vì trước khi thay đổi giá trị của biến x thành giá trị của biến y ta đã gán giá trị trước đó của biến x cho biến temp)
Câu 1: Điều kiện sau là đúng hay sai?
X:=7;
If X div 2 = 3 then
X:=7;
A. Đúng B. Sai
Câu 2: Điều kiện sau là đúng hay sai?
X:=5;
If (X mod 2 =1) and (X div 3 =2) then
X:=5;
A. Đúng B. Sai
Câu 1:
a) Với mỗi câu lệnh sau đây giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x bằng 7?
if (75 mod 5) = 0 then x := x + 1;
if x > 10 then x := x + 1 else x := x - 1;
b) Câu lệnh Pascal sau đây có hợp lệ không? Giải thích.
If x > y then max: = x; else max: = y
Câu 2:
Viết chương trình sử dụng lệnh lặp FOR để tính tổng các số tự nhiên từ 1 đến 10
Câu 3:
Viết chương trình sử dụng lệnh lặp While – Do để tính tổng các số tự nhiên từ 1 đến 10
Câu 1.
a/ x:=7;
if (75 mod 5) = 0 then x := x + 1;
-> Điều kiện đúng -> x=7+1= 8
if x > 10 then x := x + 1 else x := x - 1;
x> 7 <=> 7 > 10 -> Điều kiện sai -> rẽ nhánh -> x=7-1 = 6
b/
Câu lệnh đó không hợp lệ. Vì để sai cấu trúc rẻ nhánh (thùa dấu ; ) sau max:=x
Câu 2
Program HOC24;
var t,i: byte;
begin
t:=0;
for i:=1 to 10 do t:=t+i;
write('Tong la: ',t);
readln
end.
Câu 3
Program HOC24;
var i,t: byte;
begin
i:=1; t:=0;
while i<=10 do
begin
t:=t+i;
i:=i+1;
end;
write('Tong la: ',t);
readln
end.
Câu 1: Điều kiện sau là đúng hay sai?
X:=7;
If X div 2 = 3 then
X:=7;
A. Đúng B. Sai
Câu 2: Điều kiện sau là đúng hay sai?
X:=5;
If (X mod 2 =1) and (X div 3 =2) then
X:=5;
A. Đúng B. Sai
Câu 3: Điều kiện sau là đúng hay sai?
X:=10; Y:=9;
If (X >=Y) Or (Y>=X) then
Y:=9;
A. Đúng B. Sai
Câu 4: Điều kiện sau là đúng hay sai?
X:=2; Y:=3; Z:=4;
If ((X >=Y) or (Y>=X)) and ((Y>Z) or (X>Y)) then
Z:=4;
A. Đúng B. Sai
Câu 5: Điều kiện sau là đúng hay sai?
X:=2; Y:=3; Z:=4;
If ((X >=Y) and (Y>=X)) or ((Y<Z) and (X<Y)) then
Z:=4;
A. Đúng B. Sai
Câu 6: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=2;
If X>1 then X:=X+2;
If X>3 then X:=X+3;
A. 2 B. 3 C.4 D. 7
Câu 7: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=5;
If X>7 then X:=X-2;
If X<6 then X:=X+1;
A. 6 B. 5 C. 3 D. 7
Câu 8: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=4; Y:=5;
X:= X div 2;
Y:= Y mod 2;
If X > Y then X:= X+Y
Else X:=X-Y;
A. -1 B. 3 C. 4 D.2
Câu 9: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:=3; Y:=4;
If X*4 = Y*3 then
X:= X+Y
Else X:= X-Y;
X:= X+Y;
A. 7 B. 5 C. 11 D. 4
Câu 10: X có giá trị bao nhiêu sau khi thực hiện đoạn lệnh sau?
X:= 6; Y:=4; Z:=5;
If ((X > Y) Or (Y>X)) and (Z>Y) then
Begin
Y:=Y+Z;
X:=X+Y+Z;
End
Else
Y:=Y-Z;
X:=X+Y-Z;
A. 6 B. 20 C. 24 D. 0
Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1Bài 1 Hãy cho biết giá trị của x bằng bao nhiêu sau khi thực hiện xong câu lệnh
a) X=0, for i:=1 to 5 do X:=x+1;
b) X:=0; i:=1,while i(=5 do begin X:X*1), i:=1+1 end
c) X:=5,if (45 mod 3)=0 then X:=x+2
d) X:=7;If x>10 then X:=x=1 else X:=X-2
e) N:10,X:=100,while n.10 do n:=n+5, x:=x-n
f) X=0,for i=1 to 3 do x:=x+2*1
bạn ơi khi nào cho câu hỏi thì cho ngắn thôi :))
ai giải thích giúp mình câu này với ạ
giả sử x, i là hai biến kiểu integer. Xét đoạn chương trình sau
x:=2; For i:=1 to 6 do if i mod 3=0 then x:=x*i else x:=x+i; Writeln (x);
Đoạn chương trình trên sẽ in ra màn hình giá trị của x là
Lời giải :
B1: nhập 2 biến x,y
B2: Nếu x>y tráo đổi gía trị của x và y, chuyển đến bước 3 . Nếu y > x thì 2 số đã theo thứ tự có giá trị không giảm , chuyển đến bước 3
B3: In ra kết qủa x, y và kết thúc thuật toán
Giải thích thuật toán: ví dụ
- Hoán đổi giá trị của 2 biến x và y
Tìm giá trị lớn nhất của dãy A các số a , a ,…..,a
-…
1: Hoán đổi giá trị hai biến x và y
Chúng ta sẽ gán biến trung gian tam cho x, xong rồi gán biến trung gian tam đó cho y; rồi sau đó gán y ngược lại cho x, và xuất kết quả ra-đó chính là x và y sau khi hoán đổi cho nhau.
2: Tìm giá trị lớn nhất của dãy A
Chúng ta sẽ gán biến ln cho a[1], sau đó sẽ quét qua các phần tử trong mảng xem thử có phần tử nào lớn hơn ln thì gán ln cho phần tử đó. Sau cùng xuất ln ra, ta được số lớn nhất cần tìm.
Viết chương trình Cho hai biến x, y và in ra kết quả sau khi hoán đổi. Viết câu lệnh hoán đổi giá trị của hai biến để x và y.
#include <bits/stdc++.h>
using namespace std;
long long x,y;
int main()
{
cin>>x>>y;
swap(x,y);
cout<<x<<" "<<y;
return 0;
}