Trong hệ điều hành Windows, nêu cách để khởi động và kết thúc chương trình Microsoft Excel.
K
Khách
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.
S
0
KV
1 tháng 10 2022
Var a:array[1..200] of integer;
n,s:integer;
Begin
Write('Nhap n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
s:=s + a[i];
End;
Write('Tong cac so vua nhap la ',s);
Readln;
End.
KV
1 tháng 10 2022
Var n,i,d,s:integer;
hn,ht,hc,hdv:integer;
Begin
While (n < 999) and (n > 10000) do
Begin
Write('Nhap vao so n = ');readln(n);
End;
For i:=1 to n do
If n mod i = 0 then d:=d + 1;
If d = 2 then
Begin
hn:=n div 1000;
ht:=(n div 100) mod 10;
hc:=(n div 10) mod 10;
hdv:=n mod 10;
Write('a) Tong chu so hang nghin va hang don vi ',hn+hdv);
Write('b) Tong chu so hang tram va hang chuc ',ht+hc);
Write('c) Tong hang nghin va hang tram ',hn+ht);
End;
Readln;
End.
* Khởi động Excel:
Nháy đúp chuột vào biểu tượng Excel trên màn hình nền
* Kết thúc Excel:
Chọn File/Exit