Nhập N số bất kì . Đếm các số lớn hơn 10 và nhỏ hơn và tính tổng của chúng sau đó đưa ra màn hình: Số các số > 10 < 20 la (gia tri ) tổng của chúng là (gia tri
Nhập N số bất kì . Đếm các số lớn hơn 10 và nhỏ hơn và tính tổng của chúng sau đó đưa ra màn hình: Số các số > 10 < 20 la (gia tri ) tổng của chúng là (gia tri
program phuongt;
uses crt;
var n, s, i, d, so: integer;
begin
clrscr;
write(‘Nhap n so = ‘); readln(n);
d:=0; s:=0;
for i:=1 to n do
begin
write(‘Nhap so: ‘); readln(so);
if (so>10) and (so<20) then begin d:=d+1; s:=s+so; end;
end;
write(‘So cac so > 10 < 20 la ‘, d, ‘; tong cua chung la: ‘, s);
readln
end.
Trong nha bạn ^_^
Chúc bạn học tốt !
Xin hay nhất ạ ^~^