Определить является ли число двухзначным и найти сумму первой и второй цифоы

Ответы

sdvigov

24.07.2020

Var
n : integer;
begin
write ('Введите число: ');
readln (n);
n:=abs(n);
if n in [10..99] then write ((n mod 10) + (n div 10)) else
write ('Число не двузначное!');
end.

festjob

24.07.2020

тк Борисов жил с ученым из Ярославля, то Борисов не оттуда и не с Москвы и Санкт-Петербурга. следовательно, он с Новосибирска

Григорьев не Москвич и не с Ярославля. и теперь понятно, что не с Новосибирска. следовательно, он с Санкт-Петербурга

Егоров не с Москвы, остается один вариант, он с Ярославля

а Викторов значит с Москвы

можно сделать таблицу (по ней легко решать такие задачи):

Москва. Новосиб. С-п. Ярославль.

Борисов. - + - -

Викторов. + - - -

Григорьев. - - + -

Егоров. - - - +

Ramon22081983

24.07.2020

Басқа тілде оқу

Download PDF

Бақылау

Өңдеу

Ақпараттық қауіпсіздік — мемлекеттік ақпараттық ресурстардың, сондай-ақ ақпарат саласында жеке адамның құқықтары мен қоғам мүдделері қорғалуының жай-күйі.

Ақпаратты қорғауӨңдеу

Ақпаратты қорғау — ақпараттық қауіпсіздікті қамтамасыз етуге бағытталған шаралар кешені. Тәжірибе жүзінде ақпаратты қорғау деп деректерді енгізу, сақтау, өңдеу және тасымалдау үшін қолданылатын ақпарат пен қорлардың тұтастығын, қол жеткізулік оңтайлығын және керек болса, жасырындылығын қолдауды түсінеді. Сонымен, ақпаратты қорғау - ақпараттың сыртқа кетуінің, оны ұрлаудың, жоғалтудың, рұқсатсыз жоюдың, өзгертудің, маңызына тимей түрлендірудің, рұқсатсыз көшірмесін жасаудың, бұғаттаудың алдын алу үшін жүргізілетін шаралар кешені

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Определить является ли число двухзначным и найти сумму первой и второй цифоы

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составить программу для решения квадратного уравнения в паскале x^2+2x-6

Запусти Паскаль и введи программу: var a, b, c:integer; begin a:=−13; b:=abs(a); writeln('abs(−13)=', b); c:=sqr(b); writeln('sqr(b)=', c); c:=sqr(b+b); writeln('sqr(b+b)=', c); end. При запуске прогр...

Запишите в тетради, что получится в результате выполнения этого кода. my_list = [ [7, 12, 4, ] , [9, 50, 3] , [45, 0, -1] ] print(my_list[1] ) print(my_list[2] ) print(my_list[-1] ) Напишите...

Составить любой проект алгоритма по информатике

Мат.функции и графические возможности табличного процессора

Ввести два целых числа a и b (a ≤ b) и вывести квадраты всех чисел от a до b (включительно) Язык кумир

Отметьте справедливые утверждения для машины беббиджа а)использовались перфокарты б)выполняла сложение чисел в)выполняла умножение чисел г)выполняла команду print

Пользователь вводит два числа. если первое число меньше второго то вычислить их сумму, иначе - разность первого и второго.

Определить цвет, если заданы интенсивность базовых цветов в системе цветопе-редачи rgb: красный – 00000000, зеленый – 00000000, синий – 00000000

Напишите программу, которая вводит значения четырех переменных a, b, c, d типа integer и выводит их сумму. (паскаль)

Определить является ли число двухзначным и найти сумму первой и второй цифоы

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составить программу для решения квадратного уравнения в паскале x^2+2x-6

Запусти Паскаль и введи программу: var a, b, c:integer; begin a:=−13; b:=abs(a); writeln('abs(−13)=', b); c:=sqr(b); writeln('sqr(b)=', c); c:=sqr(b+b); writeln('sqr(b+b)=', c); end. При запуске прогр...

Запишите в тетради, что получится в результате выполнения этого кода. my_list = [ [7, 12, 4, ] , [9, 50, 3] , [45, 0, -1] ] print(my_list[1] ) print(my_list[2] ) print(my_list[-1] ) Напишите...

Составить любой проект алгоритма по информатике

Мат.функции и графические возможности табличного процессора​

Ввести два целых числа a и b (a ≤ b) и вывести квадраты всех чисел от a до b (включительно) Язык кумир

Отметьте справедливые утверждения для машины беббиджа а)использовались перфокарты б)выполняла сложение чисел в)выполняла умножение чисел г)выполняла команду print

Пользователь вводит два числа. если первое число меньше второго то вычислить их сумму, иначе - разность первого и второго.

Определить цвет, если заданы интенсивность базовых цветов в системе цветопе-редачи rgb: красный – 00000000, зеленый – 00000000, синий – 00000000

Напишите программу, которая вводит значения четырех переменных a, b, c, d типа integer и выводит их сумму. (паскаль)

Мат.функции и графические возможности табличного процессора