Bảo Ngọc-30-8.15
Hỏi từ APP VIETJACK
Câu 1 : Viết chương trình tính tích các số từ 1 đến n. Với n là số tự nhiên nhập từ bàn phím.
Câu 2 : Viết chương trình tính tổng các số lẻ từ 1 đến n. Với n là số tự nhiên nhập từ bàn phím.
Câu 2 : Viết chương trình tính tổng các số lẻ từ 1 đến n. Với n là số tự nhiên nhập từ bàn phím.
Quảng cáo
1 câu trả lời 6689
3 năm trước
câu 1
Program BTH;
uses crt;
var n,i:longint;
s:word;
begin
clrscr;
Repeat
write(‘Nhap n: ‘);readln(n);
If n mod 2=1 then
writeln(‘So nhap khong hop le moi nhap lai’);
until n>0;
s:=1;
For i:=1 to n do
s:=s*i;
write(‘Tong day so tren la: ‘,s);
readln;
end.
câu 2
program bai2;
var s,i,n:longint;
begin
write('N= ');
readln(n);
s:=0;
for i:=1 to n do
if i mod 2=0 then s:=s+i;
write('s= ',s);
readln
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44779
-
Hỏi từ APP VIETJACK26406
Thành viên hăng hái nhất trong tuần
-
truc chu 120 điểm
-
Ép Cọc Việt Nhật 20 điểm
-
nghề đỗ 20 điểm
-
hi hi 20 điểm
-
Tung Phan 20 điểm
-
Ót Vũ 20 điểm
-
Bảo Châu 20 điểm
-
bonggg
20 điểm
-
Uyên trang Nguyễn 20 điểm
-
Hieu Manh 20 điểm
-
Hang Nguyen 20 điểm
-
Huong Do 20 điểm
-
Quân Lê 20 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước7533
-
3 năm trước7166
-
3 năm trước6171
-
3 năm trước5927
-
3 năm trước5975
Gửi báo cáo thành công!
