[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!
ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.
Tin học bài tập pascal - giải câu 21 ai help với
- Thread starter NhÓc NhÍ NhỐ
- Ngày gửi
- Replies 2
- Views 415
[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!
ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.
Mã:
uses crt;
var m,x:longint;
begin
clrscr;
readln(m);
x:=m*m+2017;
write(2*x*x*x+3*x+2017);
readln
end.
- 20 Tháng bảy 2018
- 960
- 887
- 121
- 18
- Nghệ An
- Trường THCS Cao Xuân Huy
program CT;
uses crt;
var m,x:real;
begin
clrscr;
write('Nhap m');
readln(x);
x:=m*m+2017
writeln('Gia tri m la',x:5:1);
readln;
end.
uses crt;
var m,x:real;
begin
clrscr;
write('Nhap m');
readln(x);
x:=m*m+2017
writeln('Gia tri m la',x:5:1);
readln;
end.