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.
Câu 1:
a) var a:array[1..50]of real;
b) a[5]:=8;
c) for i:=1 to 50 do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to 50 do
write(a[i]:4);
Câu 2:
uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 10 do
s:=s+i;
writeln(s);
readln;
end.
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
a: for i:=1 to 40 do readln(diem[i]);
b: for i:=1 to 40 do write(diem[i]:4);
#include <bits/stdc++.h>
using namespace std;
long long i,n,a[50];
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
return 0;
}
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;