Viết chương trình pascal thể hiện thuật toán sau

viết chương trình pascal thể hiện thuật toán sau.
Bước 1: a <- 0; tong <- 10.
Bước 2: Nếu trong >40 thì chuyển sang bước 4.
Bước 3 : a <- a + 5; tong + a;.
Bước 4: In giá trị của tổng và in ra màn hình và kết thúc thuật toán.