Câu đó không phải bài 4 hay bài 5 gì cả. Bạn Rhider làm sai yêu cầu cả 2 bài

Lớp 5 không dùng dấu . để ghi phép nhân nhé em!

Đường thẳng song song với d1 và d2 là:

(d3): 2x - 3y + c (với c khác 1 và c khác 1,5)

B. -4

Chu vi tấm biển quảng cáo:

(5 + 10) x 2 = 30 (m)

Số tiền siêu thị phải chi:

40000 x 30 = 1200000 (đồng)

Số tiền mẹ Lam phải trả:

320000 - 320000 x 5 : 100 = 304000 (đồng)

Độ dài đường chéo thứ hai:

14 : 2 = 7 (cm)

Diện tích miếng kính:

14 x 7 : 2 = 49 (cm²)

Var n,i,vtl,vtn,so max,min:integer;

Begin

Write('Nhap so luong so = ');readln(n);

vtl:=0;

vtn:=0;

max:=-32768;

min:=32767;

For i:=1 to n do

Begin

Write('Nhap vao so thu ',i);readln(so);

If so > max then

Begin

Max:=so;

vtl:=i;

End;

If so < min then

Begin

Min:=so;

vtn:=i;

End;

Writeln('So lon nhat la ',max,' tai vi tri thu ',i);

Write('So nho nhat la ',min,' tai vi tri thu ',i);

Readln;

End.

Bài 5:

Var kw,i,n,s:integer;

tbc:real;

Begin

Write('Nhap so ho = ');readln(n);

For i:=1 to n do

Begin

Write('So kw ho thu ',i);readln(kw);

s:=s+kw;

End;

tbc:=s/n;

Write('So kw trung binh cua ',n,' ho la ',tbc:10:2);

Readln;

End.

Var i,n,dem:integer;

so:real;

Begin

Write('Nhap so luong so = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i);readln(so);

If so < 10 then dem:=dem+1;

End;

Write('Co ',dem,' so be hon 10');

Readln;

End.