Ответы
Ответ дал:
0
var
a,b,c,s,x:longint;
begin
readln(x);
a:=x div 100;
b:=x mod 100;
c:=x mod 10;
s:=a+b+c;
writeln(a);
writeln(b);
writeln(c);
writeln(s);
end.
PASCAL.ABC
a,b,c,s,x:longint;
begin
readln(x);
a:=x div 100;
b:=x mod 100;
c:=x mod 10;
s:=a+b+c;
writeln(a);
writeln(b);
writeln(c);
writeln(s);
end.
PASCAL.ABC
Ответ дал:
0
тогда
Ответ дал:
0
x=115
a=1
b=15
c=5
s=21
a=1
b=15
c=5
s=21
Ответ дал:
0
не на какой, задание просто такое нам задали...
Ответ дал:
0
x=115
a=1
b=15
c=5
s=21
a=1
b=15
c=5
s=21
Ответ дал:
0
Спасибо
Ответ дал:
0
при x = 115
s будет равна 21
s будет равна 21
Ответ дал:
0
Спасибо
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад