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

Определите значение переменной а, после выполнения фрагмента программы: 1) a: =7; b: =4; b: =a mod b; a: =a*b;

👇
Ответ:
juter
juter
22.07.2022
Алг

нач цел a,b

a:=7; b:=4

b:=mod(a,b)

a:=a*b

вывод a,b

кон



213

4,6(13 оценок)
Открыть все ответы
Ответ:
naxim23432
naxim23432
22.07.2022

Останется строка  77.

Рассмотрим последовательность из 12 четверок.

4444 4444 4444    При заменах эта последовательность перейдет в следующую  77 4444 4444   Далее, так как 7 только 2, а не три, заменяем четыре 4 на две семерки, получим последовательность

7777 4444 ,  теперь семерок больше 3, заменяем три семерки на 4, получим последовательность   47 4444,  далее, заменяем четыре  4 на две семерки, последовательность будет  4777,  семерок три, заменяем их на четверку, получим 44 .

Таким образом, строка из 12 четверок преобразуется в строку из двух четверок.  Если и дальше будем продолжать преобразования, то следующая последовательность из 12 четверок преобразуется в две четверки, получается цикл длиной 10 символов.  Всего таких циклов будет 20  

204/10 = 20*10 + 4   В конце получится строка из четырех четверок,  а четыре 4 преобразуются в 77, получится строка 77.

4,4(87 оценок)
Ответ:
Флаксария
Флаксария
22.07.2022
program task31177829;var y: real; x: integer;begin Writeln('ПЕРВОЕ ЗАДАНИЕ: '); Readln(x); y := x - (Power(x, 3)/3) + (Power(x, 5)/5); Writeln('Y = ', y); Writeln('ВТОРОЕ ЗАДАНИЕ: '); // если здесь всё-таки sin(2*x*y), то пишем Sin(2*x*y) // в таком случае оно возьмёт значение y из предыдущих расчётов Readln(x); y := Power(2, -x) - Cos(x) + Sin(2*x); Writeln('Y = ', y); Writeln('ТРЕТЬЕ ЗАДАНИЕ: '); Readln(x); y := (Power(x, 2) - 7*x + 10)/(Power(x, 2) - 8*x + 12); Writeln('Y = ', y); Writeln('ЧЕТВЁРТОЕ ЗАДАНИЕ: '); Readln(x); y := x - 10*Sin(x) + Abs(Power(x, 4) - Power(x, 5)); Writeln('Y = ', y);end.

во втором примере синус принимает переменную Y как значение? если так, то на 14 строке измените на:

y := Power(2, -x) - Cos(x) + Sin(2*x*y);
4,8(59 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ