viết chương trình nhập (a,b) bất kì từ bàn phím và in ra (c) phần nguyên phép chia của 2 số đó và (d) phần du phép chia 2 số đó
Bài 2: Hãy viết chương trình trong Pascal thực hiện các công việc sau:
a) Nhập 2 số nguyên a và b vào từ bàn phím (a > b và b khác 0)
b) In ra phần nguyê của phép chia cho a và b, với độ rộng in ra kết quả được quy định là 3
c) In ra phần dư của phép chia cho a và b, với độ rộng in ra kết quả được quy định là 2
d) Lưu chương trình với tên có dạng hoten-lop
Trong chương trình phải sử dụng các lệnh xóa màn hình và dừng màn hình kết quả.
- - - Mình cần gấp - - -
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a div b);
writeln(a mod b);
readln;
end.
Bài 9: Hãy viết chương trình nhập từ bàn phím hai số a, b. Hãy tính kết quả c là phép chia lấy phần dư, d là phép chia lấy phần nguyên
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<a%b<<endl;
cout<<a/b<<endl;
return 0;
}
giúp mình với, mình cảm ơn.
1.Viết chương trình nhập 2 số nguyên a, b từ bàn phím (b!=0), in tổng, hiệu, tích, thương phần nguyên a/b.
2.Viết chương trình nhập năm sinh của một người từ bàn phím, sau đó in ra lời chào và tuổi của người đó.
3.Viết chương trình nhập ba số thực a, b, c từ bàn phím là số đo 3 cạnh tam giác, sau đó tính và in chu vi, diện tích tam giác đó.
4.Viết chương trình nhập vào một số nguyên, sau đó in ra màn hình số đó là số chẵn hay lẻ.
5.Viết chương trình giải phương trình: ax^2+bx+c=0 với các hệ số a, b, c được nhập vào từ bàn phím.
Câu 3:
#include <bits/stdc++.h>
using namepsace 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;
}
giúp mình với, mình cảm ơn.
1.Viết chương trình nhập 2 số nguyên a, b từ bàn phím (b!=0), in tổng, hiệu, tích, thương phần nguyên a/b.
2.Viết chương trình nhập năm sinh của một người từ bàn phím, sau đó in ra lời chào và tuổi của người đó.
3.Viết chương trình nhập ba số thực a, b, c từ bàn phím là số đo 3 cạnh tam giác, sau đó tính và in chu vi, diện tích tam giác đó.
4.Viết chương trình nhập vào một số nguyên, sau đó in ra màn hình số đó là số chẵn hay lẻ.
5.Viết chương trình giải phương trình: ax^2+bx+c=0 với các hệ số a, b, c được nhập vào từ bàn phím.
Câu 3:
#include <bits/stdc++.h>
using namepsace 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;
}
Viết chương trình nhập vào 2 số nguyên a và b. Tính và in ra màn hình kết quả của phép chia lấy phần nguyên và chia lấy phần dư của 2 số nguyên đó
giúp mình với, mình cảm ơn. 1.Viết chương trình nhập 2 số nguyên a, b từ bàn phím (b!=0), in tổng, hiệu, tích, thương phần nguyên a/b. 2.Viết chương trình nhập năm sinh của một người từ bàn phím, sau đó in ra lời chào và tuổi của người đó. 3.Viết chương trình nhập ba số thực a, b, c từ bàn phím là số đo 3 cạnh tam giác, sau đó tính và in chu vi, diện tích tam giác đó. 4.Viết chương trình nhập vào một số nguyên, sau đó in ra màn hình số đó là số chẵn hay lẻ. 5.Viết chương trình giải phương trình: ax^2+bx+c=0 với các hệ số a, b, c được nhập vào từ bàn phím.
Câu 3:
#include <bits/stdc++.h>
using namepsace 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;
}
1.viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím. Sau đó, tính tổng các phần tử âm chia hết cho cho 7
2.viết chương trình nhập vào mảng C gồm 10 phần tử từ bàn phím. Sau đó xuất ra các phần tử là số nguyên tố
3.viết chương trình tạo nhập vào mảng D gồm K phần tử (K<= 200) từ bàn phím. Sau đó cho biết có bao nhiêu phần tử chẵn có 2 chữ số
mn giúp em giải với ạ
Câu 1:
uses crt;
var a:array[1..500]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(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]<0) and (a[i] mod 7=0) then t:=t+a[i];
writeln('Tong cac so am chia het cho 7 la: ',t);
readln;
end.
Câu 2:
uses crt;
var c,a:array[1..10]of integer;
i,kt,j,dem:integer;
begin
clrscr;
for i:=1 to 10 do
begin
write('C[',i,']='); readln(c[i]);
end;
dem:=0;
for i:=1 to 10 do
if c[i]>1 then
begin
kt:=0;
for j:=2 to c[i]-1 do
if c[i] mod j=0 then kt:=1;
if kt=0 then
begin
inc(dem);
a[dem]:=c[i];
end;
end;
if dem=0 then writeln('Trong day khong co so nguyen to')
else begin
writeln('Cac so nguyen to trong day la: ');
for i:=1 to dem do
write(a[i]:4);
end;
readln;
end.
Câu 3:
uses crt;
var d:array[1..200]of integer;
i,k,dem:integer;
begin
clrscr;
write('Nhap k='); readln(k);
for i:=1 to k do
begin
write('D[',i,']='); readln(d[i]);
end;
dem:=0;
for i:=1 to k do
if (a[i] mod 2=0) and (a[i]>=10) then inc(dem);
writeln('So phan tu chan co 2 chu so la: ',dem);
readln;
end.
nhập 2 số bất kì từ bàn phím in ra màn hình
a) phần nguyên của a chia b
b) phần dư của a chia b
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a div b);
writeln(a mod b);
readln;
end.
Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình kết quả của phép tính (chỉ lấy 2 chữ số sau phần thập phân). Giúp mình với Pascal nha mn