Xóa sạch màn hình kết quả, viết chương trình in kết quả các phép toán sau: a) 2/7; b) 2/7+(46 chia 5 lấy phần dư); c) 18 div 3; d) Tạm dừng chương trình và xem kết quả đến khi người dùng nhấn Enter; e) Điều chỉnh cách in số thực hợp lý , dịch và chạy chương trình.
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.
Mình dùng C++ nên div = /; mod = % nha bn!
#include <bits/stdc++.h>
using namespace std;
int main() {
int a, S;
cin >> a;
S=0;
while(a>0)
{
S+=a%10, a=a/10;
}
cout << S << endl;
return 0;
}
Chúc bn học tốt!
Program Tinhtong;
Uses Crt;
var i,S: integer;
begin
Clrscr;
S:=0;
For i :=1 to 7 do S:=S+i;
Writeln('Tong cac so tu 1 den 7 la ',S);
End.
#inlude<iostream>
using namespace std;
int main() {
int a, b, c;
cout << "Điểm toán : "; cin >> a;
cout << "Điểm văn : "; cin >> b;
cout << "Điểm Anh : "; cin >> c;
int d = 2 * a;
int g = 2 * b;
int h = d + g + c;
cout << "Điểm trung bình môn toán, văn, anh là: " << h / 3;
return 0;
}
uses crt;
var a,b,c,tb:array[1..10]of real;
ln,nn:real;
n:integer;
i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i],b[i],c[i]);
for i:=1 to n do
tb[i]:=(a[i]+b[i]+c[i])/3;
for i:=1 to n do
writeln(tb[i]:4:2);
readln;
end.
Program HOC24;
var s: string;
i: byte;
begin
write('Nhap xau :'); readln(s);
for i:=1 to length(s) do if s[i]<>'a' then write(s[i]);
readln
end.
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
for i:=1 to d do
if st[i]='a' then delete(st,i,1);
writeln(st);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
if (a<b) cout<<a;
return 0;
}
chương trình có chạy được không vậy bạn, mình thấy một đống lỗi rồi đấy
2:
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<a%b<<endl;
cout<<a/b;
return 0;
}
uses crt;
begin
clrscr;
writeln(2/7:4:2);
writeln(2/7+(46 mod 5):4:2);
writeln(18 div 3);
readln;
end.
giúp với chỉ có 10 phút ò:(