Câu 3: Hãy viết các câu lệnh tương ứng thực hiện các yêu cầu sau:
a) Khai báo hằng số pi
b) Khai báo biến r, S kiểu thực
K
Khách
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.
Những câu hỏi liên quan
7 tháng 5 2021
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);
7 tháng 5 2021
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.
2 tháng 11 2021
Câu 3:
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
5 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
long long a[10],i,t,dem;
int main()
{
for (i=1; i<=10; i++) cin>>a[i];
t=0;
dem=0;
for (i=1; i<=10; i++)
{
if (a[i]%2==0) t=t+a[i];
else dem++;
}
for (i=1; i<=10; i++) cout<<a[i]<<" ";
cout<<endl;
cout<<t<<endl;
cout<<dem;
return 0;
}
7 tháng 11 2021
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
BH
12 tháng 1 2022
Viết câu lệnh thực hiện yêu cầu sau:
4. Với dữ liệu câu 2, yêu cầu tính và in ra màn hình:
4a. Tổng các số chẵn
4b. Đếm các số lẽ
4c. Tích các số chia hết cho 2 hoặc 3
12 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
long long a[10],i,n,t1,dem1,s;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
t1=0;
dem1=0;
s=1;
for (i=1; i<=n; i++)
{
if (a[i]%2==0) t1+=a[i];
else dem1+=1;
if ((a[i]%2==0) or (a[i]%3==0)) s=s*a[i];
}
cout<<t1<<endl;
cout<<dem1<<endl;
cout<<s;
return 0;
}
b: r,s:real;
a) const pi=3.14;
b) var r,S: real;