1:
Các từ khóa trong Pascal là:
2:
uses crt;
var toan,van,sinh,su:real;
begin
clrscr;
write('Nhap diem Toan:'); readln(toan);
write('Nhap diem Van:'); readln(van);
write('Nhap diem Sinh:'); readln(sinh);
write('Nhap diem Su:'); readln(su);
writeln('Diem trung binh cua 4 mon la: ',(toan+van+sinh+su)/4:4:2);
readln;
end.
3:
uses crt;
var tien:real;
begin
clrscr;
write('Nhap so tien:'); readln(tien);
writeln('So tien mua hang la: ',tien+30000:4:2);
readln;
end.