Writeln ('((10+5)*(10+5)-(2+12))/3=',((10+5*(10+5)-(2+12))/3);
End
Kết quả là
Writeln ('5+20=','20+5);
End.
Kết quả là
Viết chương trình cho biết kết quả của biểu thức sau:
a) (15 + 6) * 2
b) 31 - (8 + 10) / 6 (làm tròn 1 số thập phân)
c) 22 mod 2 <> 0
giúp mik nhaaaaaaa
Viết các biểu thức sau dưới dạng phương thức Pascal
a) 15 mol 8
b)12 div 7
c) (a+b)mũ 2 . (d+c) mũ 3
d)( 25+b)mũ 6
x:995;
if(x mod 2=o) amd (x>888) then x:=68;
writeln('ket qua x = ',x);
vậy có kết quả x có giá trị gì
50/15-99^15/165
Đề: Em hãy tính ĐTB môn học của mình
Với công thức
ĐTB = (điểm miệng + điểm 15 phút + điểm giữa kì*2 + điểm cuối kì*3)/7
Điểm 15 . Điểm học kỳ . Điểm miệng = 7
GIÚP MÌNH VỚI. CHIỀU NAY THI RỒI MÀ LẠI CHƯA NGHĨ RA CÁCH LÀM
Sau mỗi câu lệnh dưới đây, giá trị của biến X sẽ là bao nhiêu nếu trước đó giá trị của X bằng 10? a) IF (91 mod 3)=0 then X :=X+20; b) if (X mod 3-2) or (X>15) then X:-2*X;
Hãy chỉ ra lỗi sai Var x:real; Begin For x:= 1 to 10 do Writeln('A');end. Giúp mình với nha:3