Информатика, опубликовано 01.02.2019 00:10
Дано трех значное число найти сумму его цифор
Ответы
Ответ оставил: Гость
var x: integer;
begin
readln(x);
writeln(x mod 10+(x div 10 mod 10)+x div 100);
end.
Ответ оставил: Гость
K = 55-----------------------------
Ответ оставил: Гость
А какая суть вопросаОтвет оставил: Гость
Vara,b,c: integer;
begin
readln(a);
c:=0;
while a<>0 do
begin
b:= a mod 10;
a:= a div 10;
if x mod 2=0 then
c:=c+1;
end;
writeln(c)
end.
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
