Làm sao để khai báo hàm function trong trương trình gốc ?

vd1:

uses crt;

var a: integer;

function dientich(a:integer):integer;

var i: integer;

begin

i:= a*a;

dientich:= i

end;

Làm sao để khai báo/sử dụng dientich vào chương trình gốc để in ra màn hình

vd2:

Đây là dãy lệnh(hình như của ông Tú Nguyễn) in các số nguyên tố đằng trước số nhập từ bàn phím, mình muốn hỏi tại sao ko cần khai biến k vẫn có thể sử dụng trong lệnh for...to... (Hoc24 ko cho phép đăng vs hình ảnh nên mk để ở dưới)

1+2+3+4+5+6+7+8+9=45

nhớ k cho mình nha

55*60=3300

Dùng ngôn ngữ lập trình Pascal: Nhập từ bàn phím các số a, b, c và kiểm tra những đẳng thức nào đúng (hiện ra dòng chữ : "Dang thuc dung: <các đẳng đúng>"

a.b = c

c-a = 4.a

2(a+b) = c+1

Nói luôn 3 số cần tìm (a,b,c) lần lượt là (3,5,15)

Coi như đây là 1 thủ thách đi :)

246,5 : (X x 5) = 7,25

X x 5              = 246,5 : 7,25

X x 5              = 34

X                   = 34 : 5

X                   =  6,8

Số ki-lô-gam đường là :

10848 x 1/4 = 2712 ( kg )

Số ki-lô-gam bột là :

10848 - 2712 = 8136 ( kg )

Đáp số : 2712 kg đường

             8136 kg bột

knha