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

Завтра диагностика! ! 16.автомат получает на вход четырёхзначное десятичное число. по полученному числу строится новое десятичное число по следующим правилам. 1. вычисляются два числа – сумма первой и второй цифр и сумма третьей и четвёртой цифр заданного числа. 2. полученные два числа записываются друг за другом в порядке неубывания (без разделителей). пример. исходное число: 2177. поразрядные суммы: 3, 14. результат: 314. определите, сколько из ниже чисел может получиться в результате работы автомата. 1915 20 101 1213 1312 312 1519 112 1212 в ответе запишите только количество чисел. 10.известная авиакомпания заносила данные о количестве утерянного багажа за год в таблицу lose. всего были занесены данные за последние 10 лет работы компании (lose[1] – количество утерянного багажа за первый год работы, lose[2] – за второй год и т. определите, какое число будет напечатано в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык ! алг нач целтаб lose[1: 10] цел t, m lose[1] : = 1; lose[2] : = 5 lose[3] : = 3; lose[4] : = 6 lose[5] : = 7; lose[6] : = 12 lose[7] : = 1; lose[8] : = 3 lose[9] : = 3; lose[10] : = 1 m : = 0 нц для t от 1 до 10 если lose[t] > 3 то m : = m + lose[t] все кц вывод m кон dim lose(10) as integer dim t,m as integer lose(1) = 1: lose(2) = 5 lose(3) = 3: lose(4) = 6 lose(5) = 7: lose(6) = 12 lose(7) = 1: lose(8) = 3 lose(9) = 3: lose(10) = 1 m = 0 for t = 1 to 10 if lose(t) > 3 then m = m + lose(t) end if next k print m паскаль! var t, m: integer; lose: array[1..10] of integer; begin lose[1] : = 1; lose[2] : = 5; lose[3] : = 3; lose[4] : = 6; lose[5] : = 7; lose[6] : = 12; lose[7] : = 1; lose[8] : = 3; lose[9] : = 3; lose[10] : = 1; m : = 0; for t : = 1 to 10 do if lose[t] > 3 then begin m : = m + lose[t]; end; writeln(m); end. 9.запишите значение переменной u, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык ! алг нач цел u,i u : = 30 нц для i от 1 до 6 u : = u – i кц вывод u кон ! dim i,u as integer u = 30 for i = 1 to 6 u = u – i next i print u var u,i: integer; begin u : = 30; for i : = 1 to 6 do u : = u – i; writeln(u); end. 7.дима хотел послушать музыку на компьютере, для этого ему нужно было включить музыкальный файл белые_розы.mp3. он начал работу с каталога с: \музыка\хиты. сначала он спустился на один уровень вниз, в каталог ретро, затем поднялся на один уровень вверх, потом спустился на один уровень в каталог лучшие и нашёл там нужный музыкальный файл. запишите полный путь к данному файлу. 1) с: \музыка\хиты\лучшие\белые_розы.mp3 2) с: \музыка\белые_розы.mp3 3) с: \белые_розы.mp3 4) с: \музыка\хиты\ретро\белые_розы.mp3

👇
Ответ:
lyba228337ggg
lyba228337ggg
26.04.2020
16. 4 числа:
1915 – не могло: в порядке неубывания число делится на 1 и 915, 915 – не сумма двух цифр
20 – не могло: не делится на два числа в порядке неубывания, только 2 и 0
101 – не могло: не делится на два числа в порядке неубывания, только 10 и 1
1213 – могло, например, для числа 6667
1312 – не могло: в порядке неубывания число делится на 1 и 312, 312 – не сумма двух цифр
312 – могло, например, для числа 1266
1519 – не могло: в порядке неубывания число делится на 1 и 519 или 15 и 19, 519 и 19 – не сумма двух цифр
112 – могло, например, для числа 1066
1212 – могло, например, для числа 6666
 
10. Дан массив [1, 5, 3, 6, 7, 12, 1, 3, 3, 1]. 
Изначально m = 0, при обходе массива если элемент Lose[t] больше 3, то к m прибавляется Lose[t].
Значит, после выполнения программы на экране будет напечатана сумма элементов массива, больших трёх. Эта сумма равна 5 + 6 + 7 + 12 = 30.
 
9. Изначально u = 30. Затем для каждого i от 1 до 6 из u вычитается значение i, после цикла u равно 30 - 1 - 2 - 3 - 4 - 5 - 6 = 9. Это значение будет выведено на экран.
 
7. Путь Димы: С:\Музыка\Хиты – С:\Музыка\Хиты\Ретро – С:\Музыка\Хиты – С:\Музыка\Хиты\Лучшие 
В последней папке он запустил Белые_розы.mp3. Полное имя файла состоит из пути к папке и имени файла: 
С:\Музыка\Хиты\Лучшие\Белые_розы.mp3
4,7(20 оценок)
Открыть все ответы
Ответ:
Just0a0reader
Just0a0reader
26.04.2020
Лучше писать результат не в тот же файл, а в другой: при составлении регулярных выражений без достаточного опыта можно легко ошибиться.

uses
  System.Text.RegularExpressions;

const
  CRLF = #13#10;

var
  s, sbig: string;
  fin, fout: Text;

begin
  Assign(fin, 'MyIn.txt');
  Reset(fin);
  sbig := '';
  while not Eof(fin) do
  begin
    Readln(fin, s);
    sbig := sbig + s + CRLF
  end;
  Close(fin);
  {пример - уладить подстроки, начиная с "http:" и до первого пробела,
  причем внутри подстроки может встретиться переход на новую строчку.
  Используется шаблон '\bhttp:\S+' - подробности: регулярные выражения}
  sbig:=RegEx.Replace(sbig, '\bhttp:\S+', '', RegexOptions.Multiline);
  Assign(fout, 'MyOut.txt');
  Rewrite(fout);
  Write(fout, sbig);
  Close(fout);
  Writeln('Конец работы');
end.
4,7(19 оценок)
Ответ:
foysogstoxyo
foysogstoxyo
26.04.2020
Червь  – программа, которая делает копии самой себя. Ее вред заключается в захламлении компьютера, из-за чего он начинает работать медленнее. Отличительной особенностью червя является то, что он не может стать частью другой безвредной программы.Троянская программа (троянский конь, троян)Троянская программа маскируется в других безвредных программах. До того момента как пользователь не запустит эту самую безвредную программу,  троян не несет никакой опасности. Тронская программа может нанести различный ущерб для компьютера. В основном трояны используются для кражи, изменения или удаления данных. Отличительной особенностью трояна является то, что  он не может самостоятельно размножаться.
4,8(11 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ