Giúp mình với ạ ????????
C1 để khai báo biến cho bài tính diện tích hình chữ nhật em viết như thế nào?
C2 hãy viết lệnh nhập 3 số a, b, c vào từ bàn phím.
C3 viết chương trìnhvtusnh trung bình cộng cyan các số x, y, z, t
C4 cho biết thông tin nào sẽ được in ra màn hình qua các câu lệnh sau : a, writeln(’15+5=’,’15+5′)
B, write-in (’13:3=’,10/3:4:4)
C, writeln( ‘let qua la:’,10-(10div3)*3)
C1:
var a,b,S:integer;
C2:
write(‘nhap 3 so a,b,c:’); readln(a,b,c);
C3:
program HD;
uses crt;
var x,y,z,t,TBC : integer;
Begin
clrscr;
write(‘nhap cac so x,y,z,t:’); readln(x,y,z,t);
writeln(‘TBC cac so la:’,(x+y+z+t)/4);
readln
End.
C4: thông tin được in ra màn hình là
a, 15+5=15+5
b, chương trình báo lỗi vì lệnh Pascal sai
c, ket qua la:1
C1: var a,b,s:integer;
C2: readln(a,b,c);
C3:
Program TB_cong;
Uses Crt;
Var x,y,z,t:integer;
s:real;
Begin
s:=1;
Clrscr;
Readln(x,y,z,t);
s:=(x+y+z+t)/4;
writeln(‘TBC= ‘,s:4:2);
Readln
End.
C4:
A. 15+5=15+5
B. đề sai thì phải
C. let qua la:1