Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
uses crt;
var s,n:integer;
begin
clrscr;
s:=0;
n:=0;
while s<=50 do
begin
n:=n+1;
s:=s+n;
end;
writeln(n);
writeln(s);
readln;
end.
var a:array[1..1000] of integer;
i,n,min:integer;
s:longint;
begin
write('n = ');readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,' = ');readln(a[i]);
s:=s+a[i];
end;
writeln('Tong la ',s);
min:=a[1];
for i:=2 to n do
if a[i] < min then min:=a[i];
write('Cac so chan la ');
for i:=1 to n do
if a[i] mod 2 = 0 then write(a[i]:8);
writeln;
write('so nho nhat la ',min);
readln
end.
Hằng: 900, 360, 1 (kdl số)
Biến: n, số bước, góc quay (kdl chữ)
Biểu thức: 900/n, 360/n (xâu kí tự)
1. Em có thể sử dụng phần mềm trình chiếu để tạo các trang chiếu như Hình 11a.1.
2. Để tạo được các trang chiếu đó em không mất nhiều thời gian, giúp cho bài trình chiếu có giao diện đẹp, chuyên nghiệp.
Em cần thêm biến diện tích.
Em đặt tên là dientich.
Cách tạo biến dientich:
1.Chọn nhóm lệnh Variables.
2. Nháy chọn nút Make a Variable.
3. Ở cửa sổ New Variable gõ tên biến dientich.
4. Nháy chọn OK.