viết chương trình tính tổng các số chẵn với điều kiện số đó không lớn hơn số đã cho
1 câu trả lời
Uses crt;
Var I, n, t, k: integer;
A:array [1..100] of integer;
Begin
Clrscr;
Writeln('nhap do dai cua day n =');readln(n);
For i:=1 to n do
Begin
Writeln('Nhap mang a[',i, ']=');
Readln(a[i]);
End;
K:=a[i];
T:=0;
If a[i]<k then t:=a[i]+t;
Writeln('tong cac Phan tu cua day la', t);
Readln
End
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
