20 Phúc Nguyên
Hỏi từ APP VIETJACK
viết chương trình nhập vào 1 số tự nhiên p. tính và in ra màn hình các số lẻ và tổng các số lẻ từ 1 đến p?
Quảng cáo
1 câu trả lời 147
Program so_le;
var i,p: integer;
t: longint;
begin
write('Nhap P: '); readln(p);
t:=0;
for i:=1 to p do if i mod 2<>0 then t:=t+i;
write('Tong cac so le la: ',t);
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45502
-
Hỏi từ APP VIETJACK28395
Gửi báo cáo thành công!
