Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
girlmarta
24.12.2021 17:24 •
Информатика
Ниже в шутливой форме написаны названия нескольких программ. какая из них не является антивирусной программой? а) доброе б) лечащая паутина в) китайский медведь г) антипод снайперу
👇
Увидеть ответ
Ответ:
dizel1747
24.12.2021
Правельный ответ - г. Так как все остальные являются антивирусными программами.
4,6
(73 оценок)
Открыть все ответы
Ответ:
KavaiiGot
24.12.2021
{ ответ дан на языке Pascal }
{ Вариант a }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str2 + Str3 + Str1);
END.
{ Вариант b }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str3 + Str1 + Str2);
END.
4,6
(32 оценок)
Ответ:
pogasii
24.12.2021
{ ответ дан на языке Pascal }
{ Вариант a }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str2 + Str3 + Str1);
END.
{ Вариант b }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str3 + Str1 + Str2);
END.
4,6
(85 оценок)
Это интересно:
О
Образование-и-коммуникации
05.03.2022
Как эффективно учиться: советы для успешного обучения...
К
Компьютеры-и-электроника
02.02.2022
Как создать файл в формате PDF с помощью бесплатного приложения OpenOffice...
Д
Дом-и-сад
10.04.2023
Как очистить забившийся шредер...
О
Образование-и-коммуникации
25.03.2023
10 советов, как раскрыть свой талант и стать успешным...
В
Взаимоотношения
07.02.2020
Как привести девушку домой на первом свидании: советы и рекомендации...
Х
Хобби-и-рукоделие
18.04.2021
Как сшить жилетку: подробный мастер-класс...
М
Мир-работы
10.10.2021
Как стать дрессировщиком дельфинов: руководство для начинающих...
В
Взаимоотношения
19.03.2022
Как прийти в себя после разрыва отношений...
К
Кулинария-и-гостеприимство
05.10.2021
Как правильно жарить курицу: секреты и рекомендации...
К
Компьютеры-и-электроника
01.08.2022
Как сохранить фото на Macbook: простые способы...
Новые ответы от MOGZ: Информатика
kristinka140320
15.11.2022
Каков информационный объем слова ?...
Araikavipv
11.01.2021
Текст составлен с использованием алфавита мощностью 64 символа и содержит 100 символов.каков информационный объем текста?...
Maybejuliar1337
11.01.2021
Решить ! блок-схему не надо,только ! на завтра ! 1.даны целые положительные числа а и в (а в). на отрезке длины а размещено максимально возможное количество отрезков длины...
toktasynnazerke
11.01.2021
Найти произведение трёх чисел вводимых с клавиатуры ,при условии,что они бльше заданного числа....
Dan4ik7211
11.01.2021
Информационный объём текста, подготовленного с компьютера, равен 3,5 кб. сколько символов содержит этот текст?...
lolipop1720
11.01.2021
Вычислить произведение всех чисел от 10 до 20,с программы...
anyanice7
11.01.2021
Посчитать сумму чисел от 30 до 60 в паскале...
2Velial1
11.01.2021
Даны объемы и массы двух тел из разных материалов. материал, какого из тел имеет большую плотность?...
tskripko
06.06.2021
Найдите количество четных и нечетных элементов массива целых чисел размерностью 10....
Наташа151515
21.06.2022
Написать программу 1)которая записывает заданные четехзначные числа наоборот 1234 4321 2) вычислить значение функции y= корень из x^2+1 - 2x^2-3/5...
MOGZ ответил
Какой план по параграфу лишайники ?...
Решите систему уравнений: х²+у²-4х-3у+5=0 3х²+3у²-11х-7у+10=0...
Какой вид немецкого оружия было Особо опасен для наших танков на улицах...
В выделенном предложении найдите слово, в котором не совпадает количество...
Тема: Иван Третий Класс: 4 Задание: какие во вы можете задать одноклассникам,...
На рисунке отец и дочь. Рост дочери — 84 см. Каков рост отца (дочь...
Основним методом дослідження науки про поведінку тварин є...
В прямоугольном треугольнике угол A равен 60°, сумма гипотенузы и меньшего...
Здійснює посадку літак масою 60 т. Якою є сила опору рухові, якщо літак...
У выражение √а дробь x−49x−6√a дробь √49x−√−x....
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
Правельный ответ - г. Так как все остальные являются антивирусными программами.