Войти
Регистрация
Спроси ai-bota
dimonatomp0ce79
01.03.2023 06:55
1)Назовите доступные пользователям папки и файлы оc windows
2)Опишите структуру рабочего стола оc windows
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
dhdhhd55
04.04.2021 05:45
Заполни таблицу. Число 1710=100012 в однобайтовом формате: Номера разрядов 7 6 5 4 3 2 1 0 Биты числа 0 0 0...
SEMKA22444
10.09.2020 10:11
С органов чувств мы познаем отдельные предметы и явления окружающего мира. Такое познание называют (как?) 2)Отдельные свойства объектов окружающего мира вызывают у нас (Что?)...
Alymov671
10.07.2021 04:38
Вам представлен образец программы с условием: F=float(input(“F=”)) If (F 0) m=F/10 print(m) Elif (F 0) print(“Нет решений”) Данная программа читается следующим образом: Дана...
gazizkadyrzhan
16.06.2022 22:20
с информатикой. Очень Составьте блок-схему и программу для целых чисел, введенных с клавиатуры, суммирующую четные числа. 2. Составьте программу, суммирующую числа «2 + 5 +...
adelyavalieva1
06.05.2023 03:27
Какой цвет соответствует коду rgb (0,250,0)...
mrflotov
03.02.2022 00:30
Валфавите некоторого выдуманного языка всего 2 буквы, каждое слово этого языка состоит из m букв. известно, что можно составить 2048 различных слов. сколько букв будет в каждом...
Никитар456
13.02.2022 15:13
DIPABUTAСоставь задачи по таблице и реши и28 м45 дм40 см13 м2 дм23 см1 дм? см2 м? м?? Дм?27 600 см3V...
povolyasha
13.02.2022 15:13
Рибалки виловили 112 кг риби, що становить 0,7 замовлення. Скільки ще риби потрібно виловити рибалкам, щоб виконати замовлення?...
politovatanya1
13.02.2022 15:13
Эволюционное изменение Пример 1) ароморфоз 2) идиоадаптация 3) дегенерация А) появление очередного листорасположения Б) возникновение длинной шеи жирафа В) редукция листьев...
Annamatveevvva8
26.05.2021 10:42
На какой высоте кинетическая энергия тела равна потенциальной если оно брошено со скоростью 4мс ответ выразите в сантиметрах без единицы измерения точки в конце число ПОДАЛУЙСТА...
Ответ:
nikitakozlav8niks
16.10.2021 16:59
{ ответ дан на языке 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.
0,0
(0 оценок)
Ответ:
millykot2003
16.10.2021 16:59
{ ответ дан на языке 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.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота