Написать программу, которая печатает True или False в зависимости от того, выполняются или нет заданные условия: - квадрат заданного трехзначного числа равен кубу суммы цифр этого числа;  -точка с координатами (x,y)принадлежит ...

Написать программу, которая печатает True или False в зависимости от того, выполняются или нет заданные условия:  - квадрат заданного трехзначного числа равен кубу суммы цифр этого числа;  -точка с координатами (x,y)принадлежит части плоскости,лежащей между прямыми x=m,x=n(m
Гость
Ответ(ы) на вопрос:
Гость
var b: 100..999;       s: word;       x, y, m, n: integer; begin   writeln('Введите трехзначное число');   readln(b);   s:=(b mod 10)+((b mod 100)div 10)+(b div 100); //сумма цифр трехзначного числа   if sqr(b)=sqr(s)*s then writeln('True')   else writeln('False');   writeln('Введите координаты х и у');   readln(x, y);   writeln('Введите m и n');   readln(m, n);   if (x>m)and(x
Не нашли ответ?
Ответить на вопрос
Похожие вопросы