Составьте программку в Паскале выводящую значение TRUEFalse 9 Данное четырехзначн. число
Составьте программу в Паскале выводящую значение TRUE\False
9 Данное четырехзначн. число читается одинаково справа влево и слева на право
и 11 Сумма каких-или 2 цифр данного естественного трехзначного числа N равна третьей цифре
Jana Bizjanina
На каком языке?
Наталья Гордыно
на паскале
1 ответ
Anja Barakina
9
var n: integer;
begin
readln(n);
if (n mod 10 = n div 1000) and (n div 10 mod 10 = n div 100 mod 10) then
writeln('TRUE')
else
writeln('FALSE');
end.
------------------
11
var n, a, b, c: integer;
begin
readln(n);
c := n mod 10; Третья цифра
b := n div 10 mod 10; Вторая цифра
a := n div 100; Первая цифра
if (a + b = c) or (a + c = b) or (b + c = a) then
writeln('TRUE')
else
writeln('FALSE');
end.
var n: integer;
begin
readln(n);
if (n mod 10 = n div 1000) and (n div 10 mod 10 = n div 100 mod 10) then
writeln('TRUE')
else
writeln('FALSE');
end.
------------------
11
var n, a, b, c: integer;
begin
readln(n);
c := n mod 10; Третья цифра
b := n div 10 mod 10; Вторая цифра
a := n div 100; Первая цифра
if (a + b = c) or (a + c = b) or (b + c = a) then
writeln('TRUE')
else
writeln('FALSE');
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Облако тегов