begin

  writeln('15*4-30+12=',15*4-30+12);

  writeln('(10+5)/(3+1)-18/(5+1) =',(10+5)/(3+1)-18/(5+1));

  writeln('(10+2)*(10+2)/(3+1)=',(10+2)*(10+2)/(3+1));

  write('((10+2)*(10+2)-24)/(3+1)=',((10+2*(10+2)-24)/(3+1));

  readln

end.

uses   crt;

var    N, i: integer;

begin

       clrscr;

       write('Nhap so N=');readln(N);

       writeln;

       writeln('Bang nhan, ',N);

       writeln;

       for i:=1 to 10 do

       begin

               GotoXY(5,WhereY);

               writeln(N,'x',i:2,'=',N*i:3);

               writeln

       end;

       readln

end.

Số chính phương là một số nguyên dương bằng bình phương của một số nguyên dương. Ví dụ: 1, 4, 9, 16, 100 … là những số chính phương; còn 3, 8, 15 … không phải là những số chính phương.
Cho trước một số nguyên dương n. Em hãy kiểm tra xem n có phải là số chính phương không?
Input: Một dòng duy nhất chứa số nguyên dương n.
Output: Đưa ra thông báo "yes" nếu n là số chính phương, ngược lại thông báo "no".

viết chương trình Pascal thực hiện các yêu cầu sau: Nhập họ và tên học sinh (HT), lớp(L). Nhập cân nặng (W) và chiều cao (H) của học sinh. Tính chỉ số khối của cơ thể BML (với BML = W/H2). In ra màn hình đánh giá về sự phát triển của hs là mập, bình thường hoặc phát triển chậm (theo tiêu chuẩn nếu BML>=25 người mập, BML>=18.5 phát triển bình thường, các trường hợp còn lại là phát triển chậm)