8класс
Страница 148 §3.3 номер 16, ГДЗ по информатике за 8 класс к учебнику Босовой
Номер 16. Составьте программу, вводящую true, если высказывание является истинным, и false в противном случае:
а) сумма цифр трёхзначного числа x является чётным числом;
б) треугольник со сторонами a, b, c является разносторонним.
а) сумма цифр трёхзначного числа x является чётным числом;
б) треугольник со сторонами a, b, c является разносторонним.
а)
program z16a;
var
x, s: integer;
otv:boolean;
begin
write('введи число>');
readln(x);
s:=x mod 10+x div 100+ x mod 100 div 10;
otv:=(s mod 2=0);
writeln(otv);
end.
б)
program z16b;
var
a,b,c: integer;
otv:boolean;
begin
write('введи длины сторон a, b, c>');
readln(a,b,c);
otv:=(a<>b)and (b<>c) and (a<>c);
writeln(otv);
end.
