HBT Blog
Image

Thuật toán tính tổng các chữ số trong pascal



Ý tưởng là ta chia số đó cho 10 lấy dư (mod) thì được chữ số hàng đơn vị, và lấy số đó div 10 thì sẽ được phần còn lại. Do đó sẽ chia liên tục cho đến khi không chia được nữa (số đó bằng 0), mỗi lần chia thì được một chữ số và ta cộng dồn chữ số đó vào tổng.

Hàm tính tổng chữ số nhận vào 1 số nguyên n và trả lại kết quả là tổng các chữ số của nó:

function tongcs(n:integer): integer;
var s : integer;
begin
s := 0;
while n <> 0 do begin
s := s + n mod 10;
n := n div 10;
end;


Thuật toán kiểm tra số nguyên tố trong pascal

Thuật toán kiểm tra số nguyên tố trong pascal của ta dựa trên ý tưởng: nếu n >1 không chia hết cho số nguyên nào trong tất cả các số từ 2 đến thì n là số nguyên tố. Do đó ta sẽ kiểm tra tất cả các số nguyên từ 2 đến có round(sqrt(n)), nếu n không chia hết cho số nào trong đó thì n là số nguyên tố.
Nếu thấy biểu thức round(sqrt(n)) khó viết thì ta có thể kiểm tra từ 2 đến n div 2.

Hàm kiểm tra nguyên tố nhận vào một số nguyên n và trả lại kết quả là true (đúng) nếu n là nguyên tố và trả lại false nếu n không là số nguyên tố.
program sont;
uses crt;
var n,i,tong,j:integer;
    snt:boolean;
    A:array[1..100] of integer;
function ktnt(a:integer):boolean;
var i:integer;
kt:boolean;
begin
kt:=true;
if a<=1 then kt:=false;
for i:=2 to trunc(sqrt(a)) do
if (a mod i = 0) then kt:=false;
ktnt:=kt;
end;
begin
clrscr;
writeln('nhap so phan tu cua mang A :');
readln(n);
for i:= 1 to n do
    begin
    writeln('nhap phan tu thu ',i,' ');
    read(A[i]);
    end;
tong:=0;
for i:=1 to n do
begin
if ktnt(A[i]) then
   tong:=tong+1;
end;
writeln('-------------------------------------------');
writeln(' tong co ',tong,' snt trong mang' );
writeln(' cac so do la ');
for i:=1 to n do
if ktnt(A[i]) then write(A[i],' ');
readln;
readln;
end.

Thuật toán kiểm tra số nguyên tố trong pascal

Tubemate - Phần mềm tải video từ Youtube về điện thoại


Phần mềm tải video từ youtube về điện thoại
Youtube là kho phim khổng lồ, chứa rất nhiều thể loại từ khoa học, giải trí, học tập và nhiều thể loại khác, tuy nhiên kho phim này không cho người dùng tải các video từ trang xem về thiết bị .
nếu trên máy tính chúng ta có thể sử dụng các công cụ và các trang web hỗ trợ hoặc phần mềm tải video từ youtube thì trên điện thoại lại rất ít công cụ có thể làm được việc đó
HBT xin chia sẻ với các bạn phần mềm tải video từ youtube về điện thoại android, với những tiện ích tuyệt vời do ứng dụng này cung cấp sẽ giúp các bạn nhanh chóng tải video từ youtube về điện thoại của mình.

Các tính năng chính nổi bật của TubeMate:
- Chế độ tải nhanh
- Nhiều tuỳ chọn độ phân giải video để tải về
- Có thể tải ngầm nhiều video một lúc
- Khả năng tiếp tục các video đang tải ngắt quãng
- Tách âm thanh từ video lưu dưới định dạng MP3
- Tạo Playlist (danh sách chạy) video và audio.
- Chia sẻ video qua Google Buzz, Twitter hoặc Email chỉ với 1 lần chạm màn hình
- Vẫn sử dụng đựoc chức năng tìm kiếm và gợi ý video từ Youtube
- Lưu các video ưa thích vào tài khoản Youtube, tạo playlist.
Tải về tại đây : Click here
Image

YouTube Music Downloader 7.7.0 full

YouTube Music Downloader 7.7.0 full

YouTube Music Downloader
Phần mềm Tải về và chuyển đổi Video YouTube  sang MP3, AVI, WMV, MOV, MP4, 3GP. Tải Hàng triệu Âm nhạc từ YouTube, Bạn có thể tải video Youtube như các tập tin âm nhạc!

Tính năng YouTube Music Downloader
Tải nhạc từ YouTube sang iPod
Tải video từ YouTube Để định dạng MOV, và xem chúng trên của iPod
Tải nhạc từ YouTube sang PSP
Tải video từ YouTube Để định dạng MP4 cho bạn PSP , thưởng thức nó sau khi chơi trò chơi!
Tải video trên YouTube sang điện thoại di động
Tải video từ YouTube ưa thích của bạn Để file 3GP, sau đó bạn có thể xem chúng trên của điện thoại di động .
Có gì mới trong YouTube Music Downloader v7.7?


YouTube Music Downloader bây giờ hỗ trợ video Vevo từ YouTube, và cũng hỗ trợ HD / HQ video tải về.

Làm thế nào để kích hoạt YouTube Music Downloader ?

1. Cài đặt YouTube Music Downloader
2. Chạy nó và bấm vào Register
3. Nhập mã  dưới đây và bấm vào Register
4. Đó là tất cả
Tải về 
Cài đặt + Key (4.5 MB) | Key (1 KB)
Image

Microsoft Office 2016 full .ISO


 Microsoft Office 2016

Microsoft Office 2016 từ khi ra đời đã thay đổi hoàn toàn cách tiếp cận các tập tin tài liệu , giờ đây nhiều người có thể cùng làm việc với một tài liệu cùng lúc mà không cần phải có mặt cùng một nơi.

Các ứng dụng của Microsoft Office 2016 hướng tới một phong cách làm việc duy nhất , không phụ thuộc vào nền tảng phần cứng. Chúng được thiết kế để cung cấp các chức năng thông thường trên bất kỳ thiết bị, tự động điều chỉnh giao diện của nó với các thông số của màn hình hiện tại và các tài nguyên hệ thống có sẵn.
Microsoft Office 2016
Những điểm mới trên Microsoft Office 2016
  • Đã có sẵn trong OneNote và Window, kiểm soát đầu vào toán học bây giờ đã có trong Word, Excel và PowerPoint.Bạn có thể viết phương trình toán học với một cây bút kỹ thuật số, một thiết bị trỏ, hoặc thậm chí ngón tay của bạn, và có mực chuyển đổi sang một định dạng "gõ".
  • Tính năng này đơn giản hóa việc giải quyết xung đột khi coauthoring. Bạn có thể lựa chọn giữa hai phiên bản của các slide mâu thuẫn, thay đổi hoặc thay đổi của người khác, thay vì chọn lọc thông qua những xung đột cá nhân.
  • Tính năng này làm tăng số lượng của các phong cách hình mặc định bằng cách giới thiệu mới "định sẵn" phong cách trong Word, Excel, và PowerPoint.
  • Chúng tôi đã cải thiện thanh duyệt thời gian trong Microsoft dự án vì vậy bây giờ bạn có thể có nhiều thanh timeline trong một cái nhìn duy nhất và bạn có thể thiết lập các phạm vi ngày cho các quán ăn thời gian vì vậy họ chỉ có thể đại diện cho một giai đoạn cụ thể của dự án của bạn. Để thử ra, nhấn vào dòng thời gian và sau đó đi đến tab Format.Lưu ý Ngày Rage mới và các lệnh Insert Timeline Bar.
  • Visio biểu đồ có thể được đáng sợ cho một người mới đến Visio và không được sử dụng để tập hợp phong phú các công cụ được cung cấp. Kinh nghiệm Getting Started bây giờ làm cho mời Visio vải hơn bằng cách cung cấp một tập hợp chọn sơ đồ khởi động trước khi chế tác sẽ giúp người sử dụng trong một số tình huống rất cốt lõi cho mẫu đó.Ngoài ra, có một số lời khuyên được cung cấp với các sơ đồ đó giúp người sử dụng chỉnh sửa và hoàn thiện trải nghiệm sáng tạo biểu đồ của họ. Sử dụng Visio là dễ dàng hơn hơn bao giờ hết.
  • Xem trước đã hỗ trợ DPI cao hơn 250% và 300% để tài liệu văn phòng của bạn trông tuyệt vời trên màn hình lớn hơn.
  • Không phải chờ đợi trong khi bảng xếp hạng lớn và SmartArt sơ đồ tải là văn bản sẽ xuất hiện ngay lập tức, cho phép bạn nhảy ngay vào và bắt đầu chỉnh sửa. Trình giữ chỗ cho các biểu đồ hoặc SmartArt sẽ được hiển thị cho đến khi đối tượng làm cho đầy đủ nhưng bạn vẫn có thể tương tác với tài liệu.
  • Chúng tôi đã thay đổi chủ đề Văn phòng mặc định để phù hợp với các hình ảnh của ứng dụng hiện đại của chúng tôi.Các chủ đề mặc định là bây giờ "đầy màu sắc" (trước đó, chủ đề mặc định là "trắng"). Bạn luôn có thể thay đổi chủ đề của bạn bằng cách vào File> Account> Office Theme.
  • Bây giờ, với vòng xoay hình ảnh tự động, khi bạn chèn một hình ảnh vào ứng dụng, nó sẽ tự động xoay hình ảnh để phù hợp với định hướng của máy ảnh. Bạn có thể tự xoay hình ảnh cho bất kỳ vị trí sau khi chèn. Lưu ý rằng điều này chỉ ảnh hưởng đến hình ảnh mới được chèn vào và không áp dụng cho hình ảnh trong tài liệu hiện có.
  • Kế hoạch xây dựng và giấy nến điện đã được làm mới với hình dạng mới để bạn có thêm nhiều lựa chọn.
  • Mở một bảng tính Excel trong SharePoint ở chế độ chỉ đọc để nhanh chóng có được những gì quan trọng nhất.
  • theme mới này được thiết kế để cung cấp cho người dùng khiếm thị người tìm thấy màn hình quá sáng không sử dụng được trong Office 2013, với một nền tảng trực quan tinh tế hơn để làm việc với các ứng dụng. Chủ đề tối cũng bao gồm các cải tiến cho cửa sổ của Word chuyển hướng (khả năng đọc tốt hơn, nhấp nháy cố định màu trắng) và một số bản sửa lỗi Outlook dễ đọc (văn bản màu trắng trên nền sáng, chữ màu tối trên nền tối, văn bản tàn tật là không đọc được). Các văn bản tab ribbon theo ngữ cảnh, di bang và điều khiển cửa sổ nhiệm vụ cũng đã được cải thiện.
  • loại biểu đồ mới
  • dữ liệu nhanh chóng liên kết trong Visio
  • Và nhiều cái khác
Cách cài đặt Microsoft Office 2016?
  1. Tải về bản  32 hoặc 64 bit ISO theo hệ thống của bạn
  2. Run "O16Setup.exe"
  3. Nhấp vào Cài đặt Office Button & Chờ  Nó Cài đặt
  4. Mở Bất kỳ ứng dụng nào trong bộ office (ví dụ như MS Word), Chờ cho đến khi một số cửa sổ popup xuất hiện
  5. Hủy bỏ Popup để đăng nhập và kích hoạt
  6. Đóng Office và trang Crack theo hướng dẫn dưới đây .
  7. Thực hiện theo các bước nhất định trên trang đó
  8. Đó là tất cả 


Downloads Microsoft Office 2016
Image

Cài windows trên USB thật dễ với WintoUSB

Cài windows trên USB thật dễ với WintoUSB
WintoUSB là phần mềm nhỏ gọn và miễn phí giúp cài đặt windows lên thiết bị USB để có thể chạy windows tại bất kỳ nơi đâu. Với WintoUSB bạn không cần phải mang theo laptop bên người nữa mà chỉ cần 1 chiếc USB , sau đó khởi động windows của bạn ở bất kỳ máy tính khác. 
Với phiên bản mới của WintoUSB bạn còn có thể sao chép phiên bản windows hiện tại của mình sang USB để mang theo bên mình

Các tính năng chính của WintoUSB :

  • Cung cấp giao diện đơn giản từng bước để tạo windows cho usb
  • Tạo Windows mới từ đĩa DVD/CD hoặc từ tập tin .iso
  • Sao chép hệ điều hành đang có trên máy tính của bạn sang USB
  • Và một số chức năng khác..
Cài windows trên USB thật dễ với WintoUSB


Một số lưu ý :

  • Windows 7 không được hỗ trợ đầy đủ nên bạn có thể chọn các phiên bản cao hơn như win 8/8.1/10
  • Windows 7 không có tích hợp hỗ trợ USB 3.0, do đó, Windows 7 sẽ phải được khởi động từ một cổng USB 2.0.
  • Cần khởi động WintoUSB bằng quyền Administrator
Cài windows trên USB thật dễ với WintoUSB

Yêu cầu hệ thống
  • Windows XP trở lên (32/64-bit).
  • bộ vi xử lý Intel® Pentium®.
  • 256MB bộ nhớ RAM có sẵn (512MB hoặc nhiều hơn).
  • 50MB không gian trống trên ổ đĩa cứng của bạn.
  • 800x600 thiết bị đồ họa (độ phân giải cao hơn).
Tải về : Tải WintoUSB tại đây

Image

Trang Get link Fshare, 4Share, Tên lửa, Tài liệu và nhiều host miễn phí

Trang Get link Fshare, 4Share, Tên lửa, Tài liệu và nhiều host miễn phí

Nếu bạn là người thường xuyên chia sẻ và tìm kiếm tài liệu trên mạng, bạn không còn xa lạ với
Image

USB Disk Security 6 - bảo vệ USB khỏi virus

USB Disk Security


USB Disk Security là phần mềm tốt nhất để ngăn chặn các vi rút có thể gây hại cho máy tính của bạn hoặc tổn hại thông tin cá nhân của bạn thông qua việc lưu trên USB.
USB Disk Security sử dụng công nghệ tiên tiến để ngăn chặn các vi rút đã biết và chưa biết thông qua ổ USB. Nó hỗ trợ ổ đĩa USB, ổ đĩa flash, thẻ an ninh kỹ thuật số, ổ USB, ổ bút, thiết bị lưu trữ , ipod, vv…
Image

Cách chặn quảng cáo đến từ Cốc cốc


Cách chặn quảng cáo đến từ Cốc cốc
Cốc cốc là trình duyệt mạnh mẽ và miễn phí, tuy nhiên các bạn biết rồi đó, hàng miễn phí có bao giờ ko kèm theo những thứ linh tinh đi theo. các bạn có để ý, mỗi lần mở cốc cốc lên chúng ta đều thấy các loại quảng cáo : thuốc đông trùng hạ thảo, quảng cáo điện thoại, xe hơi, game, đồ gia dụng . bla bla như thế này .

Image

IObit Malware Fighter 4 - Bảo vệ máy tính luôn an toàn

IObit Malware Fighter 4