uses crt;
var a,b,k,dem,x,y:longint;
begin
clrscr;
readln(a,b,k);
dem:=0;
for x:=1 to k do
for y:=1 to k do
if ((a<=b) and (a<=x*x) and (a<=y*y*y)) then dem:=dem+1;
writeln(dem);
readln;
end.
chho trước 3 số nguyên dương a,b,k 2 số nguyên dương x,y là đặc biệt nếu thỏa mãn a<= x^2,a<=b, a<=y^3,a<=b và giá trị tuyệt đói x^2-y^3 nhỏ hơn hoặc bằng k. Tìm số lượng các cặp đặc biệt
(làm ơn giúp đỡ mình cần nó trước ngày 29/1) :((
Câu 1: Tìm ước chung lớn nhất của 2 số m,n nguyên dương,tìm bội chung nhỏ nhất của 2 số m,n nguyên dương? Làm bằng pascal nhe
nhanh nhanh mik với nhe
Câu 1: Tìm ước chung lớn nhất của 2 số m,n nguyên dương,tìm bội chung nhỏ nhất của 2 số m,n nguyên dương? Làm bằng pascal nhe
nhanh nhanh mik với nhe
Viết chương trình cho phép nhập từ bàn phím một số nguyên dương n và thực hiện:
a. In ra các số nguyên tố bé hơn hoặc bằng n.
b. In ra số nguyên tố nhỏ nhất không bé hơn n. c
. In ra các cặp số nguyên tố là hai số nguyên lẻ liên tiếp nhỏ hơn hoặc bằng n.
Tạo mãng a với số phần tử n<100. Gía trị tuyệt đối của phần tử không vượt quá 300. tổng của chúng bằng bội số của 1 số tự nhiên k cho trước. (Pascal)
Bài 10. Nhập 2 số nguyên dương a, b. Nếu a là số chẵn thì giảm a đi một nửa và tăng b gấp đôi. Ngược lại, nếu a là số lẻ thì tăng a một đơn vị và tăng b thêm một lượng là a. Ví dụ:
TANGGIAM.INP TANGGIAM.OUT
4 5 2 10
làm dùng chương trình c++ đơn giản
Giải phương trình bậc nhất có dạng ax+b=0
Dữ liệu vào: 2 số a, b.
Dữ liệu ra: giá trị x tìm được, nếu không có giá trị tìm được thì ghi VN, nếu có nhiều giá trị tìm được thì ghi VSN
Ví dụ:
TT | Dữ liệu vào | Dữ liệu ra | Giải thích |
1 | 2 4 | -2 |
Làm trên pascal
cho dãy số nguyên a1,a2,a3,...,aN và 1 số nguyên k.hãy tìm một đoạn các số liên tiếp trong dãy k số,sao cho tổng các số của đoạn đó là lớn nhất pascal làm hộ mình nha :)
Nhập vào số nguyên dương N (N ≤ 100) và dãy A gồm N số nguyên dương A1, A2, …, AN (Ai ≤2.1019). In ra màn hình số chính phương lớn nhất trong dãy A. Nếu trong dãy không có số chính phương nào thì in ra giá trị là -1
