Hãy viết chương trình trình nhập vào 4 số nguyên bất kỳ thì A B C và D.Tính tích ABCD.tính tổng bình phương ABC và và tính hiệu C và D
1. viết chương trình nhập vào 4 số nguyên a, b, c, d .Tính tích và trung bình cộng của 4 số này
2. viết chương trình nhập vào 3 cạnh của 1 hình tam giác. Tính chu vi và diện tích của tam giác đó
3. viết chương trình nhập vào dộ cao của 1 vật. Tính vận tốc rơi tự do của vật đó
2:
#include <bits/stdc++.h>
using namespace std;
double a,b,c,p,s;
int main()
{
cin>>a>>b>>c;
p=(a+b+c)/2;
s=sqrt(p*(p-a)*(p-b)*(p-c));
cout<<fixed<<setprecision(2)<<s;
return 0;
}
C1.Viết chương trình tính tổng hai số A và B với A, B là 2 số được nhập từ bàn phím C2. Viết Chương trình nhập vào ba số nguyên a, b, c. tính a+b-c. C3.Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím. C4.Chương trình nhập vào 3 số x, y, z. Tính (x+y)*z Giúp em với ạ em cảm ơn nhiều lắm ạ
Câu 1:
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
write(a+b);
readln;
end.
Câu 2:
uses crt;
var a,b,c:integer;
begin
clrscr;
readln(a,b,c);
writeln(a+b-c);
readln;
end.
Câu 3:
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a-b);
readln;
end.
Câu 4:
uses crt;
var x,y,z:integer;
begin
clrscr;
readln(x,y,z);
writeln((x+y)*z);
readln;
end.
C1:Viết câu lệnh khai biến x có kiểu số nguyên và hằng a có giá trị bằng 5 trong ngôn ngữ lập trình Pascal. C2: Viết chương trình Pascal để: A) nhập vào 2 số nguyên x, y bất kỳ B) tính tổng 2 số đó C) in ra giá trị của tổng
Câu 2:
uses crt;
var x,y:int64;
begin
clrscr;
readln(x,y);
writeln(x+y);
readln;
end.
1. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử âm trong mảng.
2. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử dương trong mảng.
Mn giúp mình với!!!!!!
Câu 1:
uses crt;
var a:array[1..100]of integer;
i,n:integer;
begin
clrscr;
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
if a[i]<0 then write(a[i]:4);
readln;
end.
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n:integer;
begin
clrscr;
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
if a[i]>0 then write(a[i]:4);
readln;
end.
Viết chương trình nhập vào 2 số nguyên a,b nhập từ bàn phím. Tính và in ra màn hình: Tổng 2 số đó, Tổng bình phương của 2 số đó
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln('Tong hai so la: ',a+b);
writeln('Tong binh phuong hai so la: ',sqr(a)+sqr(b));
readln;
end.
em hãy viết chương trình nhập vào 2 số a và b yêu cầu tính tổng hiệu tích thương của 2 số đó nếu b là số 0 thì thông báo là không tính được
#include <bits/stdc++.h>
using namespace std;
double a,b;
int main()
{
cin>>a>>b;
if (b==0) cout<<"Ko tinh duoc";
else
{
cout<<a+b<<endl;
cout<<a-b<<endl;
cout<<a*b<<endl;
cout<<a/b;
}
return 0;
}
Viết chương trình nhập vào dãy gồm N số nguyên a1,a2,...,aN và số nguyên K bất kỳ . Tính và đưa ra màn hình tổng các số chia hết cho K trong dãy Giúp mình với mai mình nộp bài r 🤦
uses crt;
var a:array[1..100]of integer;
i,n,k,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
t:=0;
for i:=1 to n do
if a[i] mod k=0 then t:=t+a[i];
writeln(t);
readln;
end.
Viết chương trình nhập 3 số nguyên a b c vào từ bàn phím sau đó tính và in ra kết quả
Viết chương trình nhập 3 số nguyên a b c vào từ bàn phím sau đó tính và in ra kết quả M;Nvà P biết :
M := a+b+c
N := ab+bc+ac
P:= abc
viết chương trình nhập vào 2 phân số a/b và c/d trong đó a, b, c, d là các số nguyên ( b,d ≠ 0). tính tổng hiệu thương tích 2 phân số trên.
yêu cầu: kết quả phải xuất ra dạng phân số cuối bài xuất hiện câu hỏi "bạn có muốn thoát ra không yes/no" nếu có chọn yes nếu không chọn no.