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

Tất cả Toán học Vật Lý Hóa học Văn học Lịch sử Địa lý Sinh học Giáo dục công dân Tin học Tiếng anh Công nghệ Khoa học Tự nhiên Lịch sử và Địa lý Bảo Ngọc-30-8.15 Hỏi từ APP VIETJACK đã hỏi trong Lớp 8 Tin học · 19:05 08/03/2022 Theo dõi Báo cáo 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. Trả Lời (+5 điểm) Hỏi câu khác Hỏi chi tiết ...Xem thêm

Quảng cáo

1 câu trả lời 6797

Bình Nguyễn 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.

0 bình luận Đăng nhập để hỏi chi tiết

Quảng cáo

Bạn muốn hỏi bài tập?

Đặt câu hỏi

Câu hỏi hot cùng chủ đề

• hằng là gì  ? nêu cú pháp khai báo hằng

  Trả lời (19) Xem đáp án » 79856

• viết chương trình nhập vào 2 số nguyên a và b. In ra màn hình giá trị lớn nhất. Giup mình với ạ

  Trả lời (12) Xem đáp án » 60569
• Hỏi từ APP VIETJACK Cú pháp ,cách hoạt động của lệnh lặp for...đó?cho ví dụ minh hoạ Trả lời (8) Xem đáp án » 44971
• Hỏi từ APP VIETJACK Sô biến có thể khai báo tối đa trong 1 chương trình là bao nhiêuA. Chỉ 1 biến cho mỗi kiểu dữ liệuB.Chỉ hạn chế bởi dung lượng bộ nhớC.Không giới hạnD.10 biến Trả lời (21) Xem đáp án » 34436

• Cú pháp lệnh lặp với số lần chưa biết trước:

     A. While < điều kiện > to < câu lệnh >;

     B. While < điều kiện > to < câu lệnh 1 > do < câu lệnh 2 >;

     C. While < điều kiện > do ;< câu lệnh >;

     D. While < điều kiện > do < câu lệnh >;