Ответы
Ответ дал:
0
program summacifer;
var
sum,sot,des,ed,ch:integer;
begin
writeln('введите трехзначное число');
readln(ch);
sot:=ch div 100;
ed:= ch mod 10;
des:= ch mod 100;
des:= des div 10;
sum:=sot+ed+des;
writeln('сумма цифр вашего числа равна',sum);
end.
var
sum,sot,des,ed,ch:integer;
begin
writeln('введите трехзначное число');
readln(ch);
sot:=ch div 100;
ed:= ch mod 10;
des:= ch mod 100;
des:= des div 10;
sum:=sot+ed+des;
writeln('сумма цифр вашего числа равна',sum);
end.
Ответ дал:
0
для пятизначного другая программа нужна)
Ответ дал:
0
более сложная
Ответ дал:
0
Ок)
Ответ дал:
0
Ну ладно спс хоть за это))
Ответ дал:
0
не за что)
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад