viet chuong trinh tim Min cua 3 so a,b,c.
Viet chuong trinh tinh trung binh cong cua 3 so nhap tu ban phim
Tbc=(so a+ so b+ so c)\3
Giup minh voi
Program trung_binh_cong;
uses crt;
var a,b,c: real;
begin
clrscr;
write('nhap so a , b , c =' ,); readln(a,b,c):
writeln('trung binh cong cua 3 so = ' ,(a+b+c) / 3;
readln;
end.
Program trung_binh_cong;
uses crt;
var a,b,c: real;
begin
clrscr;
write('nhap so a , b , c =' ,); readln(a,b,c):
writeln('trung binh cong cua 3 so = ' ,(a+b+c) / 3);
readln;
end.
Cau 1: Viet chuong trinh nhap vao n so thuc. Tinh tong cua n so do
uses crt;
var s,n,i:integer;
a:array [1..100] of real;
begin
s:=0;
write('nhap so so hang cua day');readln(n);
for i:=1 to n do begin
writeln('so thu',i,'la: '); readln(a[i]); s:=s+a[i]; end;
write('tong day so thuc la:',s); readln;
end.
uses crt;
var a:array[1..100]of real;
i,n:integer;
s:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
s:=0;
for i:=1 to n do
s:=s+a[i];
writeln(s:4:2);
readln;
end.
Minh co 3 de thi thuc hanh ne . minh hoc ko gioi mon nay lam ban nao bt giup minh voi:
1, Viet chuong trinh nhap 2 so la chieu dai va chieu rong cua hinh chu nhat.tinh chu vi va dien tich .sau do in ra man hinh chu vi va dien tich cua hinh chu nhat do
2,Viet chuong trinh nhap ban kinh cua duong tron sau do tinh dien tich cua duong tron do. in kq cua dien tich h tron do ra man hinh
3, Viet cong thuc nhap lai 2 so a va b . sau do tinh tong,hieu,tich,thuong cua 2 so do . In kq ra man hinh
1. Khai báo 2 biến: a và b (trong đó: a là chiều dài, b là chiều rộng)
Cho người dùng nhập giá trị vào 2 biến trên
Công thức chu vi:(a+b)*2
Công thức diện tích: a*b
Điều kiện bổ sung:
+ Nếu a <= 0 hoặc b <=0 hoặc cả a,b <=0 => Báo lỗi (Chiều dài không bao giờ âm)!
+ Nếu a=b => Báo lỗi (Hình chữ nhật thì chiều dài không thể bằng chiều rộng)
de 3
program bt;
uses CRT;
var m,n:integer;
T:real;
BEGIN clrscr;
write('m,n ='); readln(m,n);
writeln('Tong la:',m+n);
writeln('Hieu la:',m-n);
writeln('Tich la:',m*n);
T:=m/n;
writeln('Thuong la:',T);
readln
END.
de 2
a. Hướng dẫn:
- Nhập hai cạnh vào hai biến a, b.
- Chu vi hình chữ nhật bằng 2*(a+b); Diện tích hình chữ nhật bằng a*b.
b. Mã chương trình:
Program Chu_nhat;
uses crt;
Var a, b, S, CV: real;
Begin
Write('Nhap chieu dai:'); readln(a);
Write('Nhap chieu rong:'); readln(b);
S := a*b;
CV := (a+b)*2;
Writeln('Dien tich hinh chu nhat la:',S);
Writeln('Chu vi hinh chu nhat la:',CV:10:2);
readln
end.
1) Viet chuong trinh nhap xau S1, tao xau S2 gom tat ca cac chu so cua xau S1
#include <bits/stdc++.h>
using namespace std;
string s1;
int d,i;
int main()
{
getline(cin,s1);
d=s1.length();
for (i=0; i<=d-1; i++)
if ((s1[i]>=48) and (s1[i]<=57)) cout<<s1[i];
return 0;
}
viet chuong trinh nhap vao cac so nguyen tu ban phim va tinh tong cua chung.Chuong trinh dung lai khi tong lon hon hoac bang a(a la so nhap tu ban phim)va thong bao tong do ra man hinh(Free Pascal)
Giup minh voi
Viet chuong trinh nhap vao cac so nguyen a,b,c,d,e tinh tong cac so co chu so tan cung la 5 va 0
#include <bits/stdc++.h>
using namespace std;
long long a,b,c,d,e,t;
int main()
{
cin>>a>>b>>c>>d>>e;
t=0;
if ((a%10==0) or (a%10==5)) t=t+a;
if ((b%10==0) or (b%10==5)) t=t+b;
if ((c%10==0) or (c%10==5)) t=t+c;
if ((d%10==0) or (d%10==5)) t=t+d;
if ((e%10==0) or (e%10==5)) t=t+e;
cout<<t;
return 0;
}
xac dinh INPUT , OUTPUT mo ta thuat toan roi viet chuong trinh
Nhap vao hai so nguyen bat ki , in ra man hinh thuong cua 2 so do
1.neu tu khoa nhap giu lieu va in ket qua ra man hinh
2.neu cau truc chung cua chuong trinh Pascal
3.viet thuat toan va chuong trinh
GIUP MINH VOI NHA XIN CAM ON
1) Viet chuong trinh tinh chu vi va dien tich cua hinh chu nhat co chieu dai a va chieu rong b duoc nhap tu ban phim. Xuat ket qua
#include <bits/stdc++.h>
using namespace std;
double a,b,cv,dt;
int main()
{
cin>>a>>b;
cv=(a+b)*2;
dt=a*b;
cout<<fixed<<setprecision(2)<<cv<<endl;
cout<<fixed<<setprecision(2)<<dt;
return 0;
}