Составьте программу, вводящую true, если высказывание является истинным, и false в противном случае: а) сумма цифр трёхзначного числа х является чётным числом; б) треугольник со сторонами a, b, c является разносторонним. Помоги...
Составьте программу, вводящую true, если высказывание является истинным, и false в противном случае:
а) сумма цифр трёхзначного числа х является чётным числом;
б) треугольник со сторонами a, b, c является разносторонним.
Помогите пожалуйста
Ответ(ы) на вопрос:
{a}
var x: integer;
begin
read(x);
write( (x mod 10 + x div 10 mod 10 + x div 100) mod 2 = 0 )
end.
{b}
var a,b,c: integer;
begin
read(a,b,c);
write( (a <> b) and (b <> c) and (a <> c) )
end.
Не нашли ответ?
Похожие вопросы