Câu 1.Viết chương trình sử dụng câu điều kiện
Nhập vào 1 số nguyên a kiểm tra xem số đó là số dương hay số âm
Câu2. Viết chương trình tính tổng của dãy số sau :
A=1+2+3+4…..+100
Câu 1.Viết chương trình sử dụng câu điều kiện
Nhập vào 1 số nguyên a kiểm tra xem số đó là số dương hay số âm
Câu2. Viết chương trình tính tổng của dãy số sau :
A=1+2+3+4…..+100
câu 1:
uses crt;
var n: integer;
begin
clrscr;
write (‘nhap n: ‘); readln (n);
if n<0 then writeln (n,’ la so am’);
if n>0 then writeln (n,’ la so duong’);
if n=0 then writeln (n,’ khong phai la so am cung khong phai la so duong’);
readln;
end.
câu 2:
uses crt;
var i,s: integer;
begin
clrscr;
for i:=1 to 100 do s:=s+i;
writeln (‘tong la: ‘,s);
readln;
end.