Tất cả
Khoa học Tự nhiên
Viết chương trình [ pascal ] tính tổng bình phương các số chẵn từ 1 đến n . Với n được nhập từ bàn phím
3 câu trả lời 2829
program bt;
uses crt;
var i,n,s:integer;
begin
clrscr;
writeln[' Nhập n : ' ];Readln[n];
S:=0;
For i:=1 to n do
if [i mod 2] = 0 then s:=s+sqr[i];
Writeln['Tổng S: ',S];
readln;
end.
Program
tong_so_chan;
Uses crt;
Var
S,N,I:Integer;
Begin
Clrscr;
Write['Nhap N '];Readln[N];
S:=0;
For I:=1 to N do
If [I mod 2=0] then
S:=S+I;
Writeln['Tong cac so chan la ',S];
Readln;
End.
Hỏi từ APP VIETJACK
Đâu là các từ khóa:
A.Program,end,begin
B.Program,end,begin,Readln,lop8a
C.Program,then,mot,hai,bà
D.lop82,uses,begin,end
- Selfomy Hỏi Đáp
- Học tập
- Tin học
- Tin học lớp 11
- Viết chương trình tính tổng bình...
1 Câu trả lời
Các câu hỏi liên quan
Viết chương trình in ra màn hình tam giác Pascal. Ví dụ, với n=4 sẽ in ra hình sau: 1 1 1 2 1 1 3 3 1 1 4 6 4 1 … Hàng thứ n được xác ... ;a hàng thứ n là tổng của phần tử thứ k-1 và k của hàng thứ n-1.
đã hỏi 15 tháng 10, 2019 trong Tin học lớp 11 bởi manh7a1 ● Ban Quản Trị Tiến sĩ [12.1k điểm]
- manh7a1
0 câu trả lời 43 lượt xem
Viết chương trình so sánh thành tính chạy của hai bạn hưng và long tham gia cuộc thi chạy 1000m/h tính bằng giây
đã hỏi 4 tháng 12, 2021 trong Tin học lớp 8 bởi Khách
VCT in ra màn hình chu vi diện tích của hình chữ nhật có chiều dài a, chiều rộng là b [ a va b được nhập từ bàn phím] . Tính chu vi dien tích của hình trên
đã hỏi 6 tháng 1 trong Tin học lớp 11 bởi PTG Thạc sĩ [6.0k điểm]
" Xin chào các bạn " " Mời các bạn làm quen với Turbo Pascal 7.0 "
đã hỏi 6 tháng 1 trong Tin học lớp 11 bởi PTG Thạc sĩ [6.0k điểm]
Viết chương trình in ra màn hình tam giác Pascal. Ví dụ, với n = 4 sẽ in ra hình sau: 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1
đã hỏi 7 tháng 10, 2019 trong Tin học lớp 11 bởi manh7a1 ● Ban Quản Trị Tiến sĩ [12.1k điểm]
- manh7a1