Составьте программу в Паскаль, вводящую true, если высказывание ...
Составьте программу в Паскаль, вводящую true, если высказывание является истинным, и false в противном случае.
а) Сумма цифр трёхзначного числа х является чётным числом.
б) Треугольник со сторонами a, b, с являются равносторонним.
Есть ответ
17.12.2022
193
Ответ
uses crt;
var a,b,c,n,n1:integer;begin
readln(n);n1:=(n div 100)+((n div 10) mod 10)+(n mod 10);if (n1 mod 2 = 0) then write('true');
if (n1 mod 2 = 1) then write('false'); readln(a,b,c);if (a=b) and (a=c) and (b=c) then write('true')else write('false')end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022
