Дано трехзначное число если оно является перевёртышем найти сумму цифр этого числа, а если нет то произведение цифр этого числа
5-9 класс
|
var
st: string;
i,tmp,res,err:integer;
begin
readln(st);
if (st[1] = st[3]) then
for i:=1 to 3 do
begin val(st[i],tmp,err); res:=res+tmp; end
else begin res:=1; for i:=1 to 3 do
begin val(st[i],tmp,err); res:=res*tmp;
end;
end;
writeln(res);
end.
что значит перевёртышь??
эти числа называются полиндромами
Другие вопросы из категории
использовать, чтобы уменьшить размер пересылаемой информации перед отправкой?
А) MS Word;
B) Wimnine;
C) Winrar;
D) Winamp.
Читайте также
или во втором сумма цифр этого числа будет равна 9.)
1. Даны четыре действительных числа a, b, c, x. Выяснить, пройдёт ли кирпич со сторонами a, b, c, в круглое отверстие радиуса x?
2. Дано трёхзначное натуральное число. Найти сумму цифр этого числа.
3. В данном двузначном натуральном числе подсчитать, сколько цифр больших 6, но меньших 9.
4. Даны три действительных числа больших нуля. Выяснить, являются ли они сторонами прямоугольного треугольника?
изведение всех цифр этого числа а так же колличество больших шестии