Module: Chương trình con: thủ tục và hàm - 2


Problem

1/10

chức năng chương trình con

Theory Click to read/hide

Hàm là một chương trình con trả về một kết quả (số, chuỗi ký tự, v.v.)

Hãy tưởng tượng rằng bạn đã đặt hàng một sản phẩm từ một cửa hàng trực tuyến. Từ quan điểm lập trình, bạn đã gọi một chương trình con nào đó và không giống như một thủ tục, chương trình con này phải trả về một kết quả - giao sản phẩm bạn đã đặt. Các chương trình con này được gọi là hàm.
Một hàm được định dạng giống như một thủ tục: hàm <tên hàm> (danh sách các tham số dưới dạng <tên biến>:<loại của nó> được phân tách bằng dấu chấm phẩy): <loại giá trị trả về>; bắt đầu <thân chức năng> kết thúc;
Sự khác biệt giữa một hàm và một thủ tục là một hàm phải trả về một giá trị. Để làm điều này, bạn cần sử dụng tên hàm như một biến hoặc biến đặc biệt Kết quả: hàm Sum(a, b:integer): số nguyên; bắt đầu Tổng := a + b; kết thúc; hoặc hàm Sum(a, b:integer): số nguyên; bắt đầu Kết quả := a + b; kết thúc;
Hàm trả về giá trị trung bình cộng của hai số nguyên sẽ như sau: hàm trung bình (a, b: số nguyên): thực; bắt đầu   trung bình := (a + b)/2; kết thúc; Vẫn còn phải hiểu cách gọi hàm này trong chương trình chính:
Bạn không nên gọi một hàm giống như cách bạn gọi một thủ tục: trung bình(10, 5); Giá trị trả về của hàm sẽ bị mất. Như thể hàng hóa từ cửa hàng trực tuyến không được trao cho bất kỳ ai mà bị vứt bỏ. Không chắc là khách hàng sẽ thích nó.

Đúng hơn là lưu kết quả vào một biến (hoặc in kết quả ra màn hình): a := trung bình(10, 5);

hoặc

writeln(trung bình(10, 5));

Problem

Viết hàm tính tổng các chữ số của một số tự nhiên.
Sử dụng hàm này, viết chương trình tìm trong 5 số tự nhiên đã nhập tìm số có tổng các chữ số lớn nhất. Nếu có nhiều số như vậy, in ra số lớn hơn
 
Ví dụ <đầu>
# Đầu vào Đầu ra
1 15
234
11
9
111112
234
Write the program below
var n, i, max, nmax: integer;
// функция, которая вычисляет сумму цифр числа    
// основная программа   
begin
    max := 0;
    nmax := 0; 
    for i := 0 to 4 do
    begin 
    end;
    writeln(nmax);
end. 

     

Program check result

To check the solution of the problem, you need to register or log in!