8класс
Страницы 168-173 параграф 4 3 вопрос / задание 18, ГДЗ по информатике за 8 класс к учебнику Босовой просвещение
Номер 18. Составьте программу, вводящую true, если высказывание является истинным, и false — в противном случае:
а) сумма цифр трёхзначного числа x является чётным числом;
б) треугольник со сторонами a, b, c является разносторонним.
а) сумма цифр трёхзначного числа x является чётным числом;
б) треугольник со сторонами a, b, c является разносторонним.
а)
program Z_18a_3;
var
x, s: integer;
f: boolean;
begin
write('Введи число > ');
readln(x);
s := (x div 100) + (x mod 100) + (x mod 100 div 10);
f := (s mod 2 = 0);
writeln(f)
end.
б)
program Z_18b_3;
var
a,b,c: integer;
f: boolean;
begin
write('Введи длины сторон через пробел > ');
readln(a,b,c);
f := (a<>b)and (b<>c)and (a<>c);
writeln(f);
end.
