М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Matushabos
Matushabos
18.02.2023 14:17 •  Информатика

С ИНФОРМАТИКОЙ( Задания.
Определите значение целочисленных переменных а и b после выполнения фрагмента программы на алгоритмическом языке.

1. а=10
b=(a div 2)+100
a=(b mod 10)+b

2. a=24
b=180+(a mod 7)*36
a=(b div 100)-2

3. a=51
b=30*(a div 6)/24
a=b*(b mod 4)+53

4. a=108
b=(a mod 5)*22
a=b+a+(b div 7)

5. a=273
b=(a div 100)*18+a
a=331+(b mod 8)*2

6. a=5741
b=(a mod 100)*5
a=b+(b div 6)

7. a=10817
b=(a mod 1000)*4
a=b+(a div 1000)

8. a=57181
b=(a div 1000)*2
a=(b div 100)+2b

9. a=57181
b=(a mod 1000)*2
a=(b mod 100)*2b

10. a=(10*4)+(18/3)
b=(a div 5)*18
a=(b mod 10)*300
b=a div 7

11. a=(30*15)-(4*15)
b=(a div 8)*3
a=180+(b div 10)
b=(a mod 100)*2

12. a=25
b=((a div 10)*101) mod 10
a=(b+(b mod 10))/10

13. a=400
b=((a mod 9)*10) div 3
a=((b mod 10)+(b div 10)) mod 3

14. a=1854
b=a+((a mod 1000) div 100)
a=(b div 18) mod 10

15. a=3362
b=((a mod 1000)+(a mod 100) div 10
a=(b div 10)*(b mod 10)
b=(b+a) div 10

👇
Ответ:
il1234561
il1234561
18.02.2023

1.  a=110; b=105

2. a=0; b=288

3. a=73; b=10

4.  a=183; b=66  

5. a=341; b=309

6. a=239; b=205

7. a=3278; b=3268

8.  a=229; b=114

9. a=44888; b=362

10. a=600; b=85

11. a=194; b=188

12. a=0; b=2

13. a=1; b=13

14. a=3; b=1862

15. a=8; b=5

Объяснение:

В 10 опечатка.

mod - остаток от деления

div - деление

4,6(68 оценок)
Открыть все ответы
Ответ:
nanakochieva72
nanakochieva72
18.02.2023
Var
  a, b, c: real;

begin
  Write('Введите через пробел три числа -> ');
  Readln(a, b, c);
  if ((a > b) and (b > c)) or ((a < b) and (b < c)) then
  begin a := 2 * a; b := 2 * b; c := 2 * c end
  else
  begin a := -a; b := -b; c := -c end;
  writeln('Новые значения чисел: ', a, ', ', b, ', ', c)
end.

Тестовое решение:

Введите через пробел три числа -> 18 5 -3
Новые значения чисел: 36, 10, -6

Введите через пробел три числа -> -6 0 5
Новые значения чисел: -12, 0, 10

Введите через пробел три числа -> 11 20.7 4.9
Новые значения чисел: -11, -20.7, -4.9
4,8(99 оценок)
Ответ:
CoolGirl78
CoolGirl78
18.02.2023
Трехзначное число в системе счисления по основанию p может быть записано, как N_{(p)}=n_2\times p^2+n_1\times p^1+n_0\times p^0; \\ N_{(p)}=n_2\times p^2+n_1\times p+n_0, \ \begin {cases} p \in \mathbb Z, \{n_2,n_1,n_0\} \in \mathbb Z \\ n_2 \in [1;p-1], \ \{n_1,n_0\} \in [0;p-1] \\ n_2 \ne n_0 \end {cases}
Разница между максимальным и минимальным трехзначными числами должна превышать десятичное число 200 (пока не будем учитывать дополнительное ограничение на несимметричность), т.е.
\big((p-1)\times p^2+(p-1)\times p+(p-1)\big)-\big((p^2+0\times p^1+0)\big)200; \\ (p^3-p^2+p^2-p+p-1)-p^2200; \ p^3-1200 \to p \sqrt[3]{200}
В целых числах получаем условие p≥6, т.е. основание системы счисления не может быть меньше 6.
Найдем, сколько трехзначных чисел можно получить в системе счисления с основанием 6: p^3-1=6^3-1=215_{10}.
Симметричными будут числа вида 5х5, 4х4, 3х3, 2х2, 1х1, где х - любая из цифр по основанию 6. Итого получается пять групп, в каждой из которых шесть чисел, т.е. всего трехзначных симметричных чисел может быть 30. Следовательно, в системе счисления по основанию 6 можно записать 215-30=185 трехзначных несимметричных чисел, что меньше ограничения 200.
Проверим систему счисления по основанию 7: p^3-1=7^3-1=342_{10}.
Симметричными будут числа вида 6х6, 5х5, 4х4, 3х3, 2х2, 1х1, где х - любая из цифр по основанию 7. Итого получается шесть групп, в каждой из которых семь чисел, т.е. всего трехзначных симметричных чисел может быть 42. Следовательно, в системе счисления по основанию 7 можно записать 342-42=300 трехзначных несимметричных чисел, что превышает ограничение 200.

ответ: 7
4,4(5 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ