Hàm lũy thừa trong pascal
Bạn đang xem: Hàm lũy thừa trong pascal
Bài 1: Tính xy ( Với x, y là số thực).
Program X_LUYTHUA_Y;Uses crt;Var x,y,z:real;BeginWriteln(‘TINH X LUY THUA Y:’);Writeln('----------------------------------');Write('Nhap x = '); readln(x);Write('nhap y = '); readln(y);If x>=0 then Begin z:=exp(y*ln(x)); Writeln('x ^ y = ',z:4:2); End Else Writeln('Khong tinch duoc vị x la so am');Readln;End.
Xem thêm: Dàn Ý Tả Ca Sĩ Khởi My Đang Biểu Diễn, Tả Một Ca Sĩ Đang Biểu Diễn ( Bài 1)
Program TINH_X_LUY_THUA_N;Uses crt;Var i,n,x:integer;lt:real;Begin Writeln(' TINH X LUY THUA Y:'); Writeln('----------------------------------'); Write('Nhap x ='); readln(x); Write('Nhap n ='); readln(n); lt:=1; For i:=1 to n do lt:=lt*x; Writeln(x, '^',n,' = ',lt:4:2); Readln;End.



Lập trình Pascal: Kiểm tra một điểm trực thuộc mặt đường tròn
Lập trình Pascal: Đổi quý phái giờ thời gian
Lớp 1 | Lớp 2 | Lớp 3 | Lớp 4 | Lớp 5 |
Lớp 6 | Lớp 7 | Lớp 8 | Lớp 9 | |
Lớp 10 | Lớp 11 | Lớp 12 | ||
Bài học | Bài soạn | Bài giảng | ||
Bài giới thiệu | Bài phía dẫn | |||
Bài làm cho văn | Bài trắc nghiệm | |||
Kiểm tra 15P | Kiểm tra 1 tiết | |||
Kiểm tra HK1 | Kiểm tra HK2 | |||
Thi vào lớp 10 | Tốt nghiệp THPT |
Lớp 1 | Lớp 2 | Lớp 3 | Lớp 4 | Lớp 5 |
Lớp 6 | Lớp 7 | Lớp 8 | Lớp 9 | |
Lớp 10 | Lớp 11 | Lớp 12 | ||
Kiểm tra 15 phút | Kiểm tra 1 tiết | |||
Kiểm tra học kì 1 | Kiểm tra học tập kì 2 | |||
Luyện thi theo Bài học | ||||
Luyện thi trung học phổ thông Quốc Gia |
Chuyên mục: