Напиши программу, которая при вводе трёхзначного натурального числа определяет сумму цифр, если число кратно 6 и оканчивается на 4, в противном случае выводит произведение цифр числа.
В чём может быть ошибка у меня ?
Приложения:

Ответы
Ответ дал:
0
Program hhh54;
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.
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.
Ответ дал:
0
Сразу после "if" (x mod 6=0) and ( x mod 10=4)
Ответ дал:
0
Угу,яснненько,вы конечно же заслуживаете лучшее решение)
Ответ дал:
0
А стоп,это не вы
Ответ дал:
0
Ну и ладно
Ответ дал:
0
Вам тоже спасибо
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад