Câu 1: Khai báo dữ liệu kiểu mảng trong ngôn ngữ pascal? Dữ liệu kiểu mảng trong pascallaf gì?
Câu 2: Cách thực hiện câu lệnh lặp với số lần viết trước pascal? Nêu cú pháp câu lệnh đó?
Câu 3: Viết trương trình nhập vào biến mảng 1 dãy số nguyên có tối đa 20 phần tử, in ra màn hình các số chia hết cho 4(với độ dài mảng và từng phần tử nhập từ bàn phím).
Câu 4: Viết chương trình nhập vào biến a một mảng các số nguyên có đọ dài tối đa 50 phần tử .In ra màn hình các số chẵn.
Câu 5: Viết chương trình nhập vào mảng a có tối đa 50 số nguyên, in ra màn hình các số lẻ .
Câu 6: Viết chương trình nhập vào mảng số nguyên, có tối đa 100 phần tử,in ra màn hình tổng giá trị của các phần tử chẵn.
Câu 7: Viết chương trình nhập và biến mảng b các sso nguyên, độ dài mảng 2019 phần tử,sắp xếp các phần tử theo chiều giảm dần, in ra màn hình các phần tử vừa sắp xếp.
Giúp mình với!!! Cảm ơn nhiều!!!
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.
Câu 1: Cú pháp khai báo mảng trong pascal:
Var <tên mảng>:array[1..n] of <kiểu dữ liệu>;
Cây 2: Khai báo mảng c gồm 20 phần tử kiểu số thực:
Var c:array[1..20] of real;
a)
program TenCuaMinh;
var
i: integer;
begin
for i := 1 to 10 do
writeln('Tên của mình là: <tên>');
end.
b)
program MangSoNguyen;
var
M: array[1..100] of integer;
begin
end.
Câu 6:
#include <bits/stdc++.h>
using namespace std;
double r,cv,dt;
int main()
{
cin>>r;
cv=2*r*pi;
dt=r*r*pi;
cout<<fixed<<setprecision(2)<<cv<<endl;
cout<<fixed<<setprecision(2)<<dt;
return 0;
}
Câu 3:
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
Uses crt;
var n,i: integer;
a: array[1..100] of longint;
begin clrscr;
readln(n);
for i:=1 to n do read(a[i]); readln;
writeln(a[i]:3);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i;
//chuongtrinhcon
bool ktnt(long long x)
{
if (x<=1) return(false);
for (int i=2; i*i<=x; i++)
if (x%i==0) return(false);
return(true);
}
//chuongtrinhchinh
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) if (ktnt(a[i])==true) cout<<a[i]<<" ";
return 0;
}
C2
Câu lênh dc thuc hiên nhu sau
B1 kiêm tra điêu kien
B2 neu điêu kien sai, cau lênh se bi bo qua va viêc thuc hiên lênh lap se két thuc. Neu điêu kien dung, thuc hiên cau lênh va quay lai b1
Cu phap
For( biên đêm) :=(gia tri dau) to(gia trí cuoi) do(cau lênh) ;
C2 dai lam mai len lop chép sau
C1dai lam