: 1. Viết chương trình cho phép nhập N từ bàn phím, tính tổng từ 1 đến N

Viết chương trình pascal nhập 1 dãy gồm N(0<N<=100) số nguyên a1,a2,a3,...an và 1 số nguyên k, mỗi số có giá trị không quá 10000
yêu cầu:-Xếp lại dãy đó theo thứ tự giảm dần
-chèn số nguyên k vào dãy sao cho dãy vẫn giữ đc thứ tự giảm dần(không đc sắp xếp lại)

Lập chương trình Pascal nhập 2 số nguyên dương m,n vào từ bàn phím (0<m<n 969696) sau đó: 1) Đưa ra màn hình tử số và mẫu số của phân số tối giản m/n 2) Tìm cách biểu diễn phân số m/n dưới dạng tổng của một số ít nhất các phân số có tử số là 1, đưa ra màn hình số lượng các số hạng và các mẫu số của chúng. Ví dụ: Với m=20, n=24, kết quả ra màn hình có dạng Câu 1: 5 6

Câu 2: 2

2 3

GIÚP EM VỚI

điểm trung bình cả năm của một môn học tính theo công thức:

điểm TBCN = điểm TBmHKI+ 2(điểm TBmHKII )

bằng ngôn ngữ lập trình scratch em hãy lập trình để tính điểm trung bình cả năm của môn học theo công thức ( điểm TBmHKII và điểm TBmHKII được nhập từ bàn phím)

Nhập số nguyên dương N  từ bàn phím và đưa ra màn hình thông tin sau :

Dòng 1: số nguyên lớn nhất không vượt quá N có tổng các ước của nó lớn nhất

Dòng 2: tổng các số nguyên tố không vượt quá N

Dòng 3: số chính phương nhỏ nhất lớn hơn N

Dòng 4: tổng các ước nguyên tố của N

Ví dụ

Nhập N = 10
Kết quả ra màn hình
Giải thích
10
10 là số lớn nhất không vượt quá 10 có tổng các ước bằng 17 lớn nhất
17
Tổng các số nguyên tố không vượt quá 10 bằng 17
16
Số chính phương nhỏ nhất lớn hơn 10 là 16
7
Tổng các ước nguyên tố của 10 là
 

cho số n hãy viết chương trình in ra màn hình chữ số lớn nhất vả chữ số nhỏ nhất của n

m được thành lập bằng cách đổi chữ số đầu và cuỗi cho nhau,in ra màn hình m

pascal nha

Cho 1 số nguyên n và dãy số a1,a2…an. Hãy viết chương trình tính tổng các số chia hết cho 3

Cho 1 số nguyên n và dãy số a1,a2…an. Hãy viết chương trình tìm nhỏ nhất của dãy. Rồi in kết quả ra màn hình.

Câu 17: Cho đoạn chương trình a=3; b:=2; while b< a do b:=a; kết quả của a,b sau khi kết thúc lặp là. A. 2,3 B, 3,3 C, 3,2 D.3,4

Câu 18: Cho đoạn chương trình a=3; b:=2; while b< a do begin b:=a; a:=b; kết quả của a,b sau khi kết thúc lặp là A. 2,3 B, 3,3 C, 3,2 D.3,4

Câu 21: Cho đoạn chương trình sau If n mod 2 = 0 then n:=n+1; write(n); Với n =5 thì kết quả sau khi in ra màn hình bằng bao nhiêu.\ A.6 B.7 C.5 D.4

Câu 22: Cho đoạn chương trình sau If n mod 2 = 0 then n:=n+1 else n :=n+2 write(n); Với n =5 thì kết quả sau khi in ra màn hình bằng bao nhiêu. A.6 B.7 C.5 D.4

Câu 4: Đoạn lệnh sau cho kết quả x,i bao nhiêu. X:=0; for i:=1 to 5 do x:=x+1; A. 0,0 B. 5,5 C. 15,5 D. 20,5

Câu 9: cho đoạn chương trình sau: x:= 2; y:=3; for i:=1 to 2 do begin x:=x+1; y:=x; end; Kết quả của x, y là. A. 2,4 B. 4,3 C.3,4 D. 4,4 

Cho mảng số nguyên gồm các phần tử lần lượt có các giả trị sau

2  14  67  79  24   99  11  150  64

Em hãy cho bết kết quả xuất ra màn hình của đoạn chương trình sau

for i:=1 to 9 do

if A[i]>50 then writeln(A[i]);

mô tả thuật toán và viết chương trình sắp xếp dãy số a gồm n phần tử(n được nhập từ bàn phím) sắp xếp theo thứ tự tăng dần

(pascal)

Cho 2 số nguyên dương A, B (1 ≤ A < B ≤ 30000). Tìm 2 số nguyên dương p và q (với p ≤ q) sao cho p + q = A và p x q = B. Dữ liệu vào từ file: TIMSO.INP – Gồm 2 số nguyên dương A, B (1 ≤ A < B ≤ 30000), mỗi số trên một dòng. Kết quả ghi ra file: TIMSO.OUT – Gồm 2 số nguyên dương p, q cách nhau một dấu cách. Nếu không tìm được 2 số nguyên dương p và q thỏa mãn yêu cầu thì ghi chữ N. Ví dụ: TIMSO.INP TIMSO.OUT Giải thích 10 2 8 Hai số p = 2, q = 8 vì p + q = 10 và p x q = 16 16 vd2 2 N Không tìm được 2 số nguyên dương p và q thỏa mãn yêu cầu 3

Nêu sự khác và giống nhau của câu lệnh lặp For...do và While...do

C++

Tính tổng các số nguyên tố nhỏ hơn hoặc =a(với a đc nhập từ bàn phím)

(LÀM C++) viết chương trình nhập số a đưa ra các số nguyên tố nhỏ hơn a.

Viết chương trình nhập vào M là số tiền. Hãy cho biết số tiền đó có thể đổi ra được bao nhiêu tờ loại: 100, 50, 20, 10, 5, 2, 1 đồng?

viết chương trình tính tổng các số tự nhiên từ 150 đến 300

Cho đoạn chương trình sau: 

S:= 1;

While S < 10 do

Begin

 S:= S+2;

 Writeln (S);

 end;

a, Đoạn chương trình trên cho kết quả như thế nào?

b, Viết chương trình hoàn chỉnh cho đoạn chương trình đó.

viết chương trình nhập vào dãy n số tự nhiên đầu tiên.Hãy đếm xem dãy đó có bao nhiêu số chẵn và bao nhiêu số lẻ

viết chương trình Python đọc vào 2 giá trị số nguyên a và b. Thực hiện in ra 4 dòng, trong đó:

Dòng đầu tiên chứa tổng của 2 số.
Dòng thứ 2 chứa hiệu của 2 số.
Dòng thứ 3 chứa tích của 2 số.
Dòng thứ 4 là thương và dư của phép chia a cho b

- cấu trúc rẻ nhánh có ý nghĩa gì trong việc viết nên các thuật toán?
trình bày cú pháp, thành phần của câu lệnh điều kiện

Viết chương trình kiểm tra bộ 3 đoạn thẳng có độ dài nhập từ bàn phím có lập thành tam giác hay không ?

kiểm tra mảng có đối xứng nhau hay không , kiểm tra mảng có tăng dần hay không? mảng đối xứng là mảng có phân tử Ai = An-i-1. Nếu mảng không phải là tăng dần hãy sắp xếp nó thành mảng tăng dần pascal 

1) Khai báo biến x,y là các số nguyên, S là tích của 2 số x,y

2) Viết công thức tính tổng của 2 số a,b được nhập từ bàn phím

3) Viết chương trình tính giá trị của biểu thức A = a+b2a+b2 , với a,b là các số được nhập từ bàn phím

4) Viết chương trình tính giá trị của biểu thức B = ab2ab2 , với a,b là các số được nhập từ bàn phím 5) Viết chương trình tính C = 4.(a+b+c) là các số nguyên được nhập từ bàn phím

Khi đặt tên các biến trong chương trình cần lưu ý những gì ?

Hãy phân biệt ý nghĩa của các lệnh Pascal sau đây?

Writeln('Dien tich san truong la 90*35');

Writeln('Dien tich san truong la', 90*35);

viết chương trình tính và đưa ra màn hình giá trị của biểu thức A=a+b/a-b

cho mình hỏi niết chương trình diện tích , chu vi của một số hình cơ bản

hãy dự đoán kết quả của máy tính được in ra màn hình Writeln('(10+5)/4+(1/3)',(10+5)/4+(1/3));

"phần tô đậm và nghiêng" giải thích giùm mình là 100*550 ở đâu và tại sao x-100

và  ""100*550+50*1100+(x-150)*1600);"" tại sao 550+50*1100 và x-150 
100*550+50*1100+200*1600+(x-200)*2300); tại s 550+50*1100''+200*1600'' và sao x-200

program b1;
uses crt;
var
csm,csc,x:integer;
begin
write('nhap chi so cu =');
readln(csc);
write('nhap chi so moi =');
readln(csm);
x:=csm-csc;
if x<=100 then
write('so tien phai tra =',x*550);
if (x>=101) and (x<=150) then
write('so tien phai tra =',100*550+(x-100)*1100);
if (x>=151) and (x<=200) then
write('so tien phai tra =',100*550+50*1100+(x-150)*1600);
if x>200 then
write('so tien phai tra =',100*550+50*1100+200*1600+(x-200)*2300);
readln
end.

Viết chương trình lặp đi lặp lại nhiều lần đọc số tự nhiên N, công việc này chỉ kết thúc khi gặp ký tự "Y" hoặc "y". Xuất ra số lớn nhất.

Giúp em với ạ. Em cảm ơn nhiều

Cho đoạn chương trình Pascal sau đây:

tong:= 0;

While tong<= 10 do tong:=tong+1;

Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:

A. 9                     B. 10                    C. 11                    D. 12

Cho dãy số nguyên có tối đa 100 phần tử . Hãy

a) Khai báo biến mảng của dãy số đó.

b) In ra các phần tử có giá trị chẵn trong dãy.

trong pascal, nhập vào 10 số tự nhiên và in ra màn hình các số lẻ, em sử dụng câu lệnh nào sau đây?

a.For i:=1 to 10 do begin read(a); if a mod 2 <>0 then read(a);end;

b.For i:=1 to 10 do begin read(a);if a mod 2<>0 then write(a);end;

c.For i:=1 to 10 do if a mod 2 <>0 then write(a);

d.For i:=1 to 10 do if a mod 2<>0 then read(a);

vct nhập vào 1 số n

a. đếm xem có bao nhiêu số lẻ chia hết cho n từ 1 đến 100. in đếm và các số đó

b. in ra màn hình các số chia cho 5 từ 1 đến 50

c. tính tích các số chia hết cho 5 và n từ 1 đến 100. in tích và các số đó

Viết phương trình nhập giá trị cho x,y. Xuất hiện ra màn hình giá trị x,y đã hoán đổi cho nhau

xuất ra màn hình tổng bình phương 5 lần lặp đầu tiên (S=$1^2+2^2+3^2+4^2+5^2$)

Viết chương trình tính tổng các số tự nhiên trong phạm vi từ 25 đến 35 (dùng lệnh lặp while). Thông báo kết quả ra màn hình?

Tính S(n)=$\frac{1}{1\times 2}+\frac{1}{2\times 3}+...+\frac{1}{n\times \left(x+1\right)}$ bằng python

Viết chương trình tính tổng: A= 1-2+3-4+5-...+n-(n+1) với n là số lẻ

Viết chương trình hoàn thiện in ra 5 số tự nhiên liên tiếp bằng số 1 ( viết hẳn ra 1 cách hoàn thiện nhất ạ )