Предмет:
ИнформатикаАвтор:
kian6mog#include <iostream>
#include <cmath>
#include <iomanip>
bool zad1(int N)
{
int sum = 0;
while(N > 0)
{
sum += N % 10;
N /= 10;
}
return sum % 2 == 0;
}
bool zad2(int N)
{
int sum = 0, tmp = N;
while(N > 0)
{
sum += N % 10;
N /= 10;
}
return std::pow(tmp, 2) == std::pow(sum, 3);
}
bool zad3(int a, int b, int c)
{
return (a == b && b != c) || (a == c && a != b);
}
int main()
{
int N, a, b, c;
std::cin >> N >> a >> b >> c;
std::cout.std::ios_base::setf(std::ios_base::boolalpha);
std::cout << zad1(N) << std::endl
<< zad2(N) << std::endl
<< zad3(a, b, c) << std::endl;
return 0;
}
Автор:
nicholsProgram n_1;
var x:integer;
begin
readln(x);
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
if (x mod 2 = 0) then writeln('true')
else writeln ('false');
end.
(в программе 2 таких чисел не существует)
Program n_2;
var x, y:integer;
begin
readln(x);
y:=x*x;
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
x:=x*x*x;
if (x=y) then writeln('true')
else writeln ('false');
end.
Program n_3;
var a, b, c:integer;
begin
read(a, b, c);
if (a=b) or (b=c) or (a=c) then writeln('true')
else writeln ('false');
end.
Автор:
rubén1Добавить свой ответ
Предмет:
Русский языкАвтор:
tyler85Ответов:
Смотреть
Предмет:
Русский языкАвтор:
clancyri3cОтветов:
Смотреть