Câu 1:
Giá trị của các biểu thức là:
+) 5
+) 22
Câu 2:
a) program can_nang;
usse crt;
var i,n:integer;
      A:array[1..100] og integer;
begin
clrscr;
writeln('nhap vao so ban hoc sinh trong lop: ');readln(n);
writeln('nhap vao so can nang cho tung ban hoc sinh: ');
for i:=1 to n do
begin
writeln('A[',i,']=');
readln(A[i]);
end;
readln
end.
b) Xin lỗi vì mình không hiểu ý của câu hỏi mà bạn đưa ra!!
c) program van_toc;
uses crt;
var vt,t,a,p:integer;
begin
clrscrl
writeln('nhap vao 1 canh cua san truong hinh vuong: ');readln(a);
writeln('nhap vao so giay ma ban Lan di duoc: ');readln(t);
while t>60 do
begin
writeln('nhap sai dieu kien thoi gian roi, hay nhap lai...');
readln(t);
end;
p:=a*4;
vt:=p*t;
writeln('van toc cua ban Lan da di la: ',vt,' m/s');
readln
end.