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ự)

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.

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.

uses crt;

var a:array[1..100]of real;

i,n:integer;

ln:real;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do writeln(a[i]);

ln:=a[1];

for i:=1 to n do if ln<a[i] then ln:=a[i];

writeln(ln);

readln;

end.

1.Chương trình bảng tính là phần mềm đuọc thiết kế để giúp ghi lại và trình bày thông tin dưới dạng bảng,thực hiẹn các tính cũng như xây dựng các biểu đồ biểu diển 1 cách trực quan các số liệu có trong bảng!

10.Các thành phần chính:ô,hàng,cột,khối,...

19.Để sao chép nội dung ô tính,ta thực hiện theo 4 bước:

1:Chọn ô cần sao chép đi

2:nhấn nút copy trên thanh công cụ

3:Chọn ô cần sao chép tới

4:nhấn nút paste trên thanh công cụ

SORRY,MÌNH CHỈ BIẾT BAO NHIÊU ĐÓ,XIN LỖI BẠN NHA!!!

sao nhiều quá vậy

1.Chương trình bảng tính là phần mềm được thiết kế để ghi lại và trình bày thông tin dưới dạng bảng, thực hiện các tính toán cũng như xây dựng các biểu đồ biễu diễn một trực quan các số liệu có trong bảng.

3.

-Trình bày dữ liệu dưới dạng bảng.

+Xử lí nhiều loại dữ liệu khác nhau, trong đó có dữ liệu dạng số và dữ liệu dạng văn bản.

+Khả năng tính toán nhanh và sử dụng hàm có sẵn.

+Sắp xếp và lọc dữ liệu.

+Tạo biểu đồ.

4.

-Ngoài các bảng chọn, thanh công cụ và nút lệnh giống chương trình soạn thảo văn bản Word, giao diện này còn có thêm : +Thanh công thức: dùng để nhập công thức và hiện thị dữ liệu.

+Bảng chọn Data: gồm các lệnh để xử lí dữ liệu.

+Trang tính: gồm các cột và hàng, giao giữa hàng và cột là một ô.

5.

*Các bước để nhập dữ liệu.

-B1: Chọn ô cần nhập.

-B2:Nhập dữ liệu.

-B3: Nhấn phím Enter.

6.-Sử dụng chuột.

-Các dấu mũi tên trên bàn phím.

9.Một bảng tính có nhiều trang tính. Các trang tính được phân biệt với nhau nhờ tên của trang tính.

10.-Hộp tên: là nơi hiển thị địa chỉ của ô.

-Khối: là một nhóm các ô liền kề nhau tạo thành.

-Thanh công thức: là nơi cho ta biết nội dung hoặc công thức của ô đó.

11.-Trang tính được kích hoạt là trang tính đang được hiển thị trên màn hình, để kích thoạt trang tính nào thì ta nháy chuột vào trang tính đó.

13.*Các bước để nhập công thức.

-B1: Chọn ô cần nhập.

-B2: Gõ dấu bằng.

-B3: Nhập công thức.

-B4: Nhấn phím Enter.

Lợi ích đó là:

- rút gọn việc viết phương trình

- có thể sử dụng câu lệnh lặp để thay thế nhiều câu lệnh

- tiết kiệm thời gian và công sức viết chương trình

uses crt;

var a:array[1..100]of integer;

i,n,h:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

h:=0;

for i:=1 to n do 

  if a[i] mod 2=0 then h:=h-a[i];

writeln(h);

readln;

end.

uses crt;

var a:array[1..100]of integer;

i,n:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

readln;

end.

uses crt;

var n, i, j, dem: longint; {Bạn có thể thay longint thành integer nha}

A:array[1..1000] of longint;

begin

clrscr;

Write('Nhap N: '); readln(n);

for i:=1 to n do

begin

write('Nhap phan tu thu ',i,': ');

readln(A[i]);

end;

Write('Cac so nguyen to co trong mang la: ');

for i:=1 to n do

begin

dem:=0;

for j:=2 to A[i]/2 do

if A[i] mod j=0 then dem:=dem+1;

if dem=0 then write(A[i],' ');

end;

end.

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

t:=t+a[i];

writeln(t);

readln;

end.

uses crt;
var a:array[1..1000000] of longint;
      n,i,s:longint;
begin
      clrscr;
      write('n='); readln(n);
      for i:=1 to n do 
            begin
                  write('a[',i,']: '); readln(a[i]);
                  inc(s,a[i]);
            end;
      writeln('Tong: ',s);
      readln;
end.