В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
upf300804
upf300804
28.03.2021 00:47 •  Информатика

Задания 1. Прочитайте текст. Подчеркните нарушения правил техники безопасности.
Арыстан бережно относится к компьютеру. На компьютерном столе находится
монитор и шь. Каждый вечер Арыстан проводит 4 часа без перерыва за
компьютерными играми.
1. Определите два последствия, к которому приведет нарушения правил техники
безопасности при работе за компьютером.
Последствие 1:
Последствие 2:
2. Определите устройства компьютера.
2.1 Это устройство называют "мозгом" компьютера. Его основными функциями являются
обработка информации и вычислительные работы
2.2 Это устройство предназначено для_ранения информации проико јьного доступа
Является основным накопителем данных в большинстве компьютеров
2.3 Выделите знаком
цифровые накопители информации.​

Показать ответ
Ответ:
ДевочКаНауКи
ДевочКаНауКи
19.10.2022 08:20
Var
  s, w: string;
  i, X, n, k, p, q: integer;

begin
  Writeln('Введите фразу, разделяя слова ровно одним пробелом');
  Readln(s);
  Write('Введите номер слова для поиска: '); Readln(X);
  {
  Ищем в строке s местоположение слова номер Х.
  Его начальную позицию в строке обозначим p, а конечную - q
  }
  n := Length(s);
  i := 1; k := 0; p := 0; q := 0;
  repeat
    if s[i] = ' ' then
    begin
      Inc(k);
      if k = X - 1 then p := i + 1
      else if k = X then q := i - 1
    end;
    if q = 0 then i := i + 1
  until (q > 0) or (i > n);
  if (p = 0) then Writeln('Количество слов в строке меньше ', X)
  else if q = 0 then q := n;
  w := Copy(s, p, q - p + 1);
  if (Pos('а', w) > 0) or (Pos('о', w) > 0) then
    Writeln('Одна из букв (а,о) есть в слове "', w, '"')
  else Writeln('В слове "', w, '" нет ни буквы а, ни буквы о')
end.

Тестовое решение:
Введите фразу, разделяя слова ровно одним пробелом
Самая лучшая рыба- это колбаса!
Введите номер слова для поиска: 5
Одна из букв (а,о) есть в слове "колбаса!"

Введите фразу, разделяя слова ровно одним пробелом
Тестирование программ может служить доказательством наличия ошибок, но никогда не докажет их отсутствие!» Эд. Дейкстра, 1972 г.
Введите номер слова для поиска: 4
В слове "служить" нет ни буквы а, ни буквы о
0,0(0 оценок)
Ответ:
12345TEREX
12345TEREX
14.08.2020 20:15
А) НОЧЬ - НОЛЬ - МОЛЬ - МЕЛЬ - ДЕЛЬ - ДЕНЬ
Дель — мелкая сеть
 
б) РОТА - НОТА - БОТА - БОЛА - ПОЛА - ПОЛК
Бота — испанский мешок для вина
Бола — испанское метательное оружие
 
в) БАНТ - КАНТ - КАРТ - КОРТ - КОРА - КОСА
 
г) БЕГ - БЕЛ - МЕЛ - МЕХ - МОХ - ЛOХ - ЛОГ - ЛАГ - ШАГ
Бел — единица громкости звука
Лoх — китайский кустарник
Лаг — прибор для измерения скорости судна
 
д) МОРЕ - МОРГ - ТОРГ - ТОРТ - СОРТ - БОРТ - БУРА - СУРА - СУША
Бура — минерал
Сура — раздел в Коране
 
е) МИГ - МИМ - ЖИМ - ЖОМ - КОМ - КОЛ - КОК - ВОК - ВЕК
Вок — китайский котёл для жарки
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота