Vd3: Viết chương trình in ra màn hình danh sách họ và tên các bạn trong tổ của mình
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
uses crt;
var a:array[1..100]of string;
i,n:integer;
begin
clrscr;
write('nhap so lop='); readln(n);
for i:=1 to n do
begin
write('Nhap ten lop thu ',i,'='); readln(a[i]);
end;
writeln('Danh sach cac lop 9 la: ');
for i:=1 to n do
writeln(a[i]);
readln;
end.
Anh ơi, anh nhầm khối rồi ạ nên anh chuyển lên lớp 12 hỏi chứ bọn em mới lớp 6 chx hiểu về mấy cái này nên anh thông cảm
a = []
sum = 0
n = 5
# Nhập danh sách a
for i in range(n):
x = int(input("Nhập phần tử thứ " + str(i+1) + ": "))
a.append(x)
# Tính tổng các phần tử trong danh sách a
for i in range(n):
sum += a[i]
# In ra màn hình tổng các phần tử trong danh sách a
print("Tổng các phần tử trong danh sách a là: ", sum)
2:
#include <bits/stdc++.h>
using namespace std;
long long a[1000],i,n;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) if (a[i]%2==0) cout<<a[i]<<" ";
return 0;
}
2:
#include <bits/stdc++.h>
using namespace std;
int main()
{
string st;
int a;
cin>>st;
cin>>a;
cout<<"Xin chao "<<st<<endl;
cout<<"Nam nay "<<st<<" "<<2021-a<<" tuoi";
return 0;
}
Program HOC24;
var a: array[1..1000] of integer;
i,n : integer;
t: longint;
begin
write('Nhap N: '); realdn(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do if a[i] mod 3 = 0 then t:=t+a[i];
write('Tong cac so la boi cua 3 trong danh sach la: ',t);
readln
end.
Program HOC24;
var a: array[1..100] of string;
i: integer;
begin
write('Nhap so ban trong to cua minh : '); readln(n);
for i:=1 to n do
begin
write('Nhap ho va ten cua ban thu ',i,' : '); readln(a[i]);
end;
writeln('Danh sach cac ban hoc sinh trong to la : ');
for i:=1 to n do writeln(a[i]);
readln
end.