Pascal Tính tổng các số nguyên dương chia hết cho 5

Pascal Tính tổng các số nguyên dương chia hết cho 5

(1) Tính tổng các số nguyên dương chia hết cho 5.

Function TongSoChiaHet5( A:Mang20,  N:Integer):Integer;
Var S,i :Integer;
Begin
            S:=0;
            For i:=0 to N do
                  If(A[i] mod 5=0)
                        S := S+A[i];
            TongSoChiaHet5:= S;
End;

(2) Tính tổng các số nguyên tố trong mảng

Function LaSoNT( Var N:Integer) :Integer;
Var i:Integer;
Begin
            For i:=2 to N-1do
                  If(N mod i = 0) then
                        return 0
                  Else
                        return 1;
End;
Function TongSoNT(Var A : Mang20, Var N:Integer):Integer;
Var S,i:Integer;
Begin  
S:=0;
            For i:=0 to Ndo
                  If ( LaSoNT( A[i] ) ) then
                        S :=S+ A[i];
            TongSoNT :=S;
End;
Bạn thấy bài viết này như thế nào?: 
Average: 9.8 (170 votes)
Ảnh của Tommy Tran

Tommy owner Express Magazine

Drupal Developer having 9+ year experience, implementation and having strong knowledge of technical specifications, workflow development. Ability to perform effectively and efficiently in team and individually. Always enthusiastic and interseted to study new technologies

  • Skype ID: tthanhthuy

Advertisement

 

jobsora

Dich vu khu trung tphcm

Dich vu diet chuot tphcm

Dich vu diet con trung

Quảng Cáo Bài Viết

 
Creating Printer-friendly Versions of Drupal Articles

Tạo Printer-friendly trong Drupal Articles

In this tutorial we'll show you how to add a "Print This Page" button to Drupal. The main reason you'd want to do this is as a courtesy for your readers. Many still print things they read online and you don't want them to waste that expensive printer ink just to print your logo and theme as well as the article.

10 trò chơi hay tuyệt cho iPhone

10 trò chơi hay tuyệt cho iPhone

iPhone của bạn đã có những tựa game này chưa?

Hướng dẫn thêm icons cho webform Drupal module

Hướng dẫn thêm icons cho webform Drupal module

With all this nifty fashion for icon fonts you probably want to add some icon to your label in Drupal webform module. The only issue is that by default webform would strip majority of HTML tags for security reasons.

Công ty diệt chuột T&C

 

Diet con trung