Cehuginn 4 ноября 2019 в 11:02
Составьте программу, вводящую 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 lt;gt; b) and (b lt;gt; c) and (a lt;gt; c) )
end.
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 lt;gt; b) and (b lt;gt; c) and (a lt;gt; c) )
end.
Компьютеры и вычисления
269
38
Для комментирования необходимо зарегистрироваться на сайте