Напиши программу, которая при вводе трёхзначного натурального числа определяет сумму цифр, если число кратно 6 и оканчивается на 4, в противном случае выводит произведение цифр числа.
В чём может быть ошибка у меня ?
В чём может быть ошибка у меня ?
More Questions From This User See All
Answers & Comments
var x: longint;
begin
read (x);
if (x mod 6=0) and ( x mod 10=4) then write ((x div 100)+((x div 10) mod 10)+(x mod 10))
else write ((x div 100)*((x div 10) mod 10)*(x mod 10));
end.