Viết chương trình nhập từ bàn phím 1 số A có 2 chữ số.Tính tồng 2 chữ số A.
Ví dụ:
A=12 suy ra S=1+2=3,in ra S là số 3
A=27 suy ra S=2+7=9,in ra S là số 9
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
1 tháng 12 2021
Caua1:
program caumot;
begin
writeln('lop 8A chao ban!');
end.
Câu 2:
program cauhai;
int a,b,c :real;
begin
write('a='); readln(a);
write('b='); readln(b);
c= a+b;
write('Tong hai so a b la:',c);
end.
VD
16 tháng 3 2022
Var i,S,n: longint;
Begin
Readln(n);
For i:=1 to n do S:=S+i
Write(S);
Readln
End.
3 tháng 4 2021
uses crt;
var s:string;
i,d:integer;
begin
clrscr;
write('Nhap xau S:'); readln(s);
d:=length(s);
for i:=1 to d do
s[i]:=upcase(s[i]);
writeln(s);
readln;
end.
ML
15 tháng 4 2022
Câu 1:
s=0; i=0
Vòng lặp thứ 1: i<3 -> đúng -> i=i+1=0+1=1; s=s+i*i=0+1*1=1
Vòng lặp thứ 2: i<3 -> đúng -> i=i+1=1+1=2; s=s+i*i=1+2*2=5
Vòng lặp thứ 3: i<3 -> đúng -> i=i+1=2+1=3; s=s+i*i=5+3*3=14
Vòng lặp thứ 4: i<3 -> sai -> không thực hiện vòng lặp -> kết thúc vòng lặp
Vậy kết quả S in ra màn hình là 14
AP
25 tháng 7 2021
cau 1:
uses crt;
var a:array[1..100] of integer;
n,i,min: integer;
begin
readln(n);
for i:=1 to n do
readln(a[i]);
min:=a[1];
for i:=2 to n do
if min>a[i] then min=a[i];
writeln(a[i]);
readln;
end.
cau 2:
uses crt;
g:text;
s:string;
const fo='CHUSO.TXT';
begin
assign(g,fo);
rewrite(g);
readln(s);
for i:=1 to length(s) do
if not((s[i] in ['a'..'z'])and(s[i] in ['A'..'Z])) then delete(s,i,1);
writeln(g,s);
end.
12 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
long long i,n;
double s;
int main()
{
cin>>n;
s=0;
for (i=1; i<=n; i++)
s=s+((1*1.0)/(2*(i*1.0+1*1.0)));
cout<<fixed<<setprecision(2)<<s;
return 0;
}
30 tháng 10 2021
Câu 1:
#include <bits/stdc++.h>
using namespace std;
double a,b,c;
int main()
{
cin>>a>>b>>c;
cout<<fixed<<setprecision(2)<<(a+b+c)/3;
return 0;
}
D
datcoder
CTVVIP
26 tháng 3
#include <stdio.h>
int main(){
int n;
scanf("%d",&n);
long t=0; int i,j;
for (i=2; i<=n; i++){
int c=0;
for (j=2; j<i; j++)
if (i%j==0) c++;
if (c==0) t=t+i;
}
printf("%d",t);
return 0;
}
uses crt;
var a,b,s:integer;
begin
clrscr;
write('Nhap so A co 2 chu so: ');readln (a);
if (a>9) and (a<100) then begin
s:=0;
while a<>0 do
begin
b:=a mod 10;
a:=a div 10;
s:=s+b;
end;
write('Tong 2 chu so A la: ',s); end else write('So A nhap vao khong thoa man');
readln;
end.
bn lm sai r