K
Khách

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.

7 tháng 11 2021

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)

 

#include <bits/stdc++.h>

using namespace std;

int a;

int main()

{

cin>>a;

if (a<=8) cout<<"Hop le";

else cout<<"Khong hop le";

return 0;

}

5 tháng 12 2021

chương trình có chạy được không vậy bạn, mình thấy một đống lỗi rồi đấy

7 tháng 12 2021

Phát biểu đúng mà bạn, câu B sai á.

1. Xác định bài toán

2. Mô tả thuật toán.

3. Viết chương trình

19 tháng 12 2021

c: 

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<a*b;

return 0;

}

Xác định bài toán:

Input: a

Output: a*a

Mô tả thuật toán

Bước 1: Nhập a

Bước 2: Xuất a*a;

Bước 3: Kết thúc 

27 tháng 11 2021

#include<iostream>

using namespace std;

int main() {

int x, y;

cout << "x : "; cin >> x;

cout << "y : "; cin >> y;

cout << "x + y = " << x + y;

cout << "x - y = " << x - y;

cout << "x * y = " << x * y;

cout << "x / y = " << x / y;

return 0;

}

27 tháng 11 2021

còn cách khác hay hơn nếu bạn muốn mình sẽ chia sẻ

24 tháng 11 2021

Câu 1 :

Tham khảo

Y tưởng : xét từng số hạng trong dãy nếu số hạng > 0 thì xếp vào một biến tổng rồi chia cho số hàng đã xếp được

Input : Dãy A gồm N số nguyên a1....aN;

Output : Trung bình cộng của  các số dương;

B1 : Nhập N số nguyên a1.... aN;

B2 : TB <--- 0, dem <---- 0, i <---- 1, Tong <--- 0;

B3 : Nếu a[i] > 0 thì Tong <--- TB + a[i];

B4 : dem <--- dem + 1;

B5 : Nếu i > N thì đưa ra màn hình kết quả TB = Tong/Dem rồi kết thúc chương trình;

B 6 : i <--- i + 1 rồi quay lại B3;

Câu 2 :

Tham khảo

Ta nhận thấy rằng, bội số chung nhỏ nhất của hai số nguyên dương a, b có thể được tính theo công thức:

ab/d

trong đó d là ước chung lớn nhất của a và b.

Bởi vậy:

Nên viết hàm để tính bội chung nhỏ nhất của hai số nguyên dương vì chương trình con cần trả ra một giá trị;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b cần sử dụng hàm tính ước chung lớn nhất của a và b.

- Hàm tính ước chung lớn nhất của hai số nguyên dương a, b:

function ucln (a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r: = a mod b ,a : = b ; b:= r; end; ucln:= a; and;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b:

ADVERTISING Video Player is loading.

This is a modal window.

The media could not be loaded, either because the server or network failed or because the format is not supported.partner logo 

lunction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Khi đó, chương trình con tính bội số chung nhỏ nhất của hai số nguyên dương a, b như sau:

program bai4_chuong6;

use crt ;

vai

X y: integer;

function ucln(a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r:= a mod b; a: = b ,b:= r;

end; ucln:= a;

end;

txnction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Begin

clrscr;

writeln('Nhap vao hai so can tim BCNN');

write ('x=') , readln(x); write ('y=') , readln(y);

writeln('bcnn cua hai so',x:4,'va',y:4,'la',bcnn(a,b)

readln

End.

Câu 3 : chịu