Tìm kiếm:

Nhập vào 1 chuỗi ký tự, và thay thế tất cả cụm từ "anh" = "em".
VD: anh và anh => em và em.

Bác nói rất đúng, gái trai gì mà chẳng giống nhau, tại sao cứ thích vô xưng mình là con gái, chắc nghĩ tụi mình là đồ háo sắc đấy.

==> Có thử chưa mà biết không được, nhập vào 1 số có khác gì với nhập vào 1 chuỗi miễn sao ra kết quả đúng với thuật toán ngắn gọn, đúng là ếch ngồi đáy giếng.

uses crt;
var s:string;
i,tong,f,v:integer;
begin
clrscr;
readln(s);
for i:= 1 to length(s) do
begin
val(s[i],f,v);
tong:=tong+f;

N! có nghĩa là gì vậy???

Cho 1 dãy số nguyên và hãy sắp xếp theo nguyên tắc các số chẵn đứng đầu tiếp đến là số lẽ. Mình đã làm bài này nhưng nó hơi dài dòng ai có thể giúp mình giải ngắn gọn hơn không.

uses crt;
var...

Ông ra nhà sách mua cuốn "Giáo Trình Pascal" tác giả TS Dương Xuân Thành giá 50 ngàn đồng. Trong đó có rất nhiều đề thi tin học quốc tế và phổ thông.

Tìm số k sao cho n chia hết cho m ^ k. Có nghĩa là n chia hết cho m * m * m *... với k lần. ví dụ nhập m = 2 và n = 16, và 2^4 = 16 như vậy k sẽ = 4.

Xét số 16 đều có thể chia hết cho 2^1 2^2...

Phiền ông giải thích cho tui thuật toán bài này đi.

Vâng xin lỗi cụ em biết sai rồi.