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.

D
datcoder
CTVVIP
18 tháng 3

Để kiểm tra số nguyên C có tồn tại hay không ta chia ra các trường hợp A, B như sau:

 A = B -> C tồn tại

|A| = |B| -> C tồn tại 

Ngược lại \(A\ne B\) và \(\left|A\right|\ne\left|B\right|\) -> C không tồn tại

Bạn đặt các câu lệnh theo mình gợi ý nhé. Nếu có thắc mắc bạn cứ hỏi mình.

uses crt;

var a,b,x,y:integer;

//chuongtrinhcon

function ucln(var 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;

//chuongtrinhchinh

begin

clrscr;

readln(a,b);

x:=a;

y:=b;

if (x>0) and (y>0) then writeln(x div ucln(a,b),' ',y div ucln(a,b));

if (x<0) and (y<0) then 

begin

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end; 

if (x<0) and (y>0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

if (x>0) and (y<0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

readln;

end.

uses crt;

var a,b,x,y:integer;

//chuongtrinhcon

function ucln(var 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;

//chuongtrinhchinh

begin

clrscr;

readln(a,b);

x:=a;

y:=b;

if (x>0) and (y>0) then writeln(x div ucln(a,b),' ',y div ucln(a,b));

if (x<0) and (y<0) then 

begin

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end; 

if (x<0) and (y>0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

if (x>0) and (y<0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

readln;

end.

ai giúp em giải bt pascal này với ạBạn Tí hôm nay vừa được giải nhất cuộc thi Toán qua mạng, phần thưởng của bạn là một số tiền của ban tổ chức. Tuy nhiên, ban tổ chức muốn thử thách mức độ giỏi Toán bạn ấy một lần nữa.Ban tổ chức cho Tí một con số, và nhiệm vụ của bạn ấy là phải xóa đi một trong hai số ở hàng đơn vị hoặc hàng chục. Số sau khi xóa sẽ chính là tiền thưởng của Ban...
Đọc tiếp

ai giúp em giải bt pascal này với ạ

Bạn Tí hôm nay vừa được giải nhất cuộc thi Toán qua mạng, phần thưởng của bạn là một số tiền của ban tổ chức. Tuy nhiên, ban tổ chức muốn thử thách mức độ giỏi Toán bạn ấy một lần nữa.

Ban tổ chức cho Tí một con số, và nhiệm vụ của bạn ấy là phải xóa đi một trong hai số ở hàng đơn vị hoặc hàng chục. Số sau khi xóa sẽ chính là tiền thưởng của Ban tổ chức dành cho bạn Tí.

Bạn hãy lập trình giúp Tí tìm ra con số lớn nhất là số tiền thưởng của Ban tổ chức.

INPUT:

·        Một dòng duy nhất chứa số nguyên dương N (10 ≤ N ≤ 109) là số mà Ban tổ chức đưa cho Tí

OUTPUT:

·        Một số duy nhất là số tiền lớn nhất mà Tí có thể nhận được.

Ví dụ:

INPUT

OUTPUT

1230

123

1203

123

0
GIUP MINH VS NHA MK DANG CAN GAPBờm và Cuội chơi trò chơi đoán số như sau:  Bờm chọn lấy hai số nguyên dương 𝑋, 𝑌 (𝑋 > 𝑌) rồi thông báo cho Cuội biết một dãy số thỏa mãn: trong dãy có một phần tử bằng tổng 𝑋 + 𝑌, một phần tử khác bằng hiệu 𝑋 − 𝑌  Nhiệm vụ của Cuội là đoán hai số 𝑋, 𝑌. Trò chơi khá khó nhưng sau nhiều lần chơi, Cuội biết được Bờm rất thích...
Đọc tiếp

GIUP MINH VS NHA MK DANG CAN GAP

Bờm và Cuội chơi trò chơi đoán số như sau:  Bờm chọn lấy hai số nguyên dương 𝑋, 𝑌 (𝑋 > 𝑌) rồi thông báo cho Cuội biết một dãy số thỏa mãn: trong dãy có một phần tử bằng tổng 𝑋 + 𝑌, một phần tử khác bằng hiệu 𝑋 − 𝑌  Nhiệm vụ của Cuội là đoán hai số 𝑋, 𝑌. Trò chơi khá khó nhưng sau nhiều lần chơi, Cuội biết được Bờm rất thích chọn cặp số giá trị lớn. Vì vậy, để tính toán dễ hơn, trong mỗi ván chơi Cuội sẽ cho bạn biết dãy số Bờm đưa ra và nhờ bạn xác định tích 𝑃 = 𝑋 × 𝑌 lớn nhất có thể phù hợp với dãy đó (nghĩa là tồn tại cặp số (𝑋, 𝑌) sao cho tích của chúng bằng 𝑃 mà tổng và hiệu của chúng đều xuất hiện trong dãy Bờm đưa ra). Dữ liệu  Dòng 1: số nguyên 𝑁 (2 ≤ 𝑁 ≤ 50) là số phần tử của dãy Bờm đưa ra  Dòng 2: 𝑁 số nguyên dương đôi một phân biệt là các phần tử dãy Bờm đưa ra, các số đều trong phạm vi 1 … 100. Kết quả  Dòng 1: số nguyên là tích lớn nhất tính được. Số này chắc chắn tồn tại vì Bờm không bao giờ chơi gian dối. Ví dụ BDOANSO.INP BDOANSO.OUT 3 1 4 5 6Bờm và Cuội chơi trò chơi đoán số như sau:  Bờm chọn lấy hai số nguyên dương 𝑋, 𝑌 (𝑋 > 𝑌) rồi thông báo cho Cuội biết một dãy số thỏa mãn: trong dãy có một phần tử bằng tổng 𝑋 + 𝑌, một phần tử khác bằng hiệu 𝑋 − 𝑌  Nhiệm vụ của Cuội là đoán hai số 𝑋, 𝑌. Trò chơi khá khó nhưng sau nhiều lần chơi, Cuội biết được Bờm rất thích chọn cặp số giá trị lớn. Vì vậy, để tính toán dễ hơn, trong mỗi ván chơi Cuội sẽ cho bạn biết dãy số Bờm đưa ra và nhờ bạn xác định tích 𝑃 = 𝑋 × 𝑌 lớn nhất có thể phù hợp với dãy đó (nghĩa là tồn tại cặp số (𝑋, 𝑌) sao cho tích của chúng bằng 𝑃 mà tổng và hiệu của chúng đều xuất hiện trong dãy Bờm đưa ra). Dữ liệu  Dòng 1: số nguyên 𝑁 (2 ≤ 𝑁 ≤ 50) là số phần tử của dãy Bờm đưa ra  Dòng 2: 𝑁 số nguyên dương đôi một phân biệt là các phần tử dãy Bờm đưa ra, các số đều trong phạm vi 1 … 100. Kết quả  Dòng 1: số nguyên là tích lớn nhất tính được. Số này chắc chắn tồn tại vì Bờm không bao giờ chơi gian dối. Ví dụ BDOANSO.INP 3 1 4 5 BDOANSO.OUT  6

0

2:

#include <bits/stdc++.h>

using namespace std;

int A[100],ln,nn,vt1,vt2,n;

int main()

{

cin>>n;

for(int i=1; i<=n; i++) cin>>A[i];

ln=A[1];

for (int i=1; i<=n; i++)

ln=max(ln,A[i]);

nn=A[1];

for (int i=1; i<=n; i++)

nn=min(nn,A[i]);

vt1=1; vt2=n;

for (int i=1; i<=n; i++)

if (ln==A[i] && vt1<=i) vt1=i;

for (int i=n; i>=1; i--)

if (nn==A[i] && vt2>=i) vt2=i;

swap(A[vt1],A[vt2]);

for (int i=1; i<=n; i++)

cout<<A[i]<<" ";

}

7 tháng 11 2021

Program tinh_tong;

uses crt;

var a,b:Integer;

begin

Write('Nhap gia tri a: ');

Readln(a);

Write('Nhap gia tri b: ');

Readln(b);

Writeln('Tong: ',a+b);

Readln();

end.

26 tháng 11 2021

Tham khảo

 

Đề bài: Ba số dương a, b c là độ dài ba cạnh của một tam giác khi và chỉ khi a+b>c, b+c>a, a+c>b

Em hãy thực hiện ác yêu cầu sau:

c) Mô tả thuật toán để giả quyết bài toán

26 tháng 11 2021

Tham khảo

 

c. Thuật toán (2đ)

Bước 1: Nhập ba số dương a, b và c

Bước 2 : Nếu a + b > c và b + c > a và c + a > b thì thông báo ba số a, b và c tạo thành 3 cạnh của tam giác ngược lại thông báo ba số a, b và c không tạo thành ba cạnh của tam giác.

Bước 3: Kết thúc thuật toán