Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
GenGis
10.10.2021 19:39 •
Информатика
Прощай Сайт
Объясните как работает паскаль)
👇
Увидеть ответ
Открыть все ответы
Ответ:
anna47983
10.10.2021
#include <cstdio>
#include <cstring>
int
main(void)
{
enum
{
MAX_BUF_SIZE = 100
};
char buf[MAX_BUF_SIZE];
scanf("%s", buf);
int n = strlen(buf);
int shift = 0;
for (int i = 0; i < n; i++) {
shift = (shift + buf[i] - '0') % 3;
}
shift = 3 - shift;
int sel = -1;
for (int i = 0; i < n; i++) {
int tmp = buf[i] - '0' + shift;
if (0 <= tmp && tmp <= 9) {
sel = i;
break;
}
}
if (sel == -1) {
for (int i = n - 1; i >= 0; i++) {
int tmp = buf[i] - '0' - shift;
if (0 <= tmp && tmp <= 9) {
buf[i] -= shift;
break;
}
}
} else {
buf[sel] += shift;
while ('0' <= buf[sel] + 3 && buf[sel] + 3 <= '9') {
buf[sel] += 3;
}
}
printf("%s\n", buf);
return 0;
}
4,6
(22 оценок)
Ответ:
kimd1
10.10.2021
#include <iostream>
#include <string>
#include <vector>
using namespace std;
int main()
{
int sum = 0;
vector<int> v;
string s;
cin >> s;
for (int i = 0; i < s.size(); ++i) {
v.push_back((int)s[i] - 49);
++sum; ++v[i];
}
int z = sum % 3; z = 3 - z;
{
int i = 0;
while (i <= v.size() && (v[i] + z) > 9) {
++i;
}
if (i >= v.size()) {
if (z == 3) {
v[v.size() - 1] -= 3;
} else {
v[v.size() - 1] -= (3 + z);
}
} else {
v[i] += z;
while ((v[i] + 3) < 9) {
v[i] += 3;
}
}
}
for (int i = 0; i < v.size(); ++i) {
cout << v[i];
}
return 0;
}
4,8
(38 оценок)
Это интересно:
З
Здоровье
21.06.2021
Как распознать симптомы японского энцефалита?...
Х
Хобби-и-рукоделие
14.10.2022
Сумка под коврик для йоги: как сшить самому...
С
Стиль-и-уход-за-собой
30.01.2020
Как выбрать правильный продукт для женской гигиены...
С
Семейная-жизнь
30.12.2022
Как справиться с желтухой новорожденного?...
Ф
Финансы-и-бизнес
24.08.2021
Как купить серебро: советы для новичков...
Х
Хобби-и-рукоделие
05.06.2023
Изготовление сумки почтальона своими руками...
К
Кулинария-и-гостеприимство
03.12.2020
Кекс из простых ингредиентов: легко, быстро и вкусно!...
З
Здоровье
19.02.2020
Гель алоэ вера: эффективное средство от прыщей и других проблем кожи...
К
Компьютеры-и-электроника
04.02.2020
Как загрузить видео, созданное в Windows Movie Maker, на YouTube...
К
Компьютеры-и-электроника
14.03.2020
Как построить классный дом в Sims 3...
Новые ответы от MOGZ: Информатика
Skelet001
07.03.2021
Сколько кбайт информации содержат сообщения следующего объёма: 213 битов...
чо2
30.09.2021
дайте развернутые ответы на вопросы. 1 в каком случае сообщение содержит информацию для конкретного человека, а в каком – нет? примеры обоих случаев и обоснуйте ответ. 2 перечислите...
kote03012
13.07.2020
задача. в школьной библиотеке книги расположены на 16 стеллажах с 8 полками каждая. библиотекарь сообщила Диане, что книга, которая ей нужна, находится на 5 полке 7 стеллажа.в каком...
dunina2018
22.09.2021
Эгрономика не үшін адамға маңызды ғылым болып саналады?...
Boodmi
07.03.2023
Які в циклу з лічильником відмінності від циклу завжди...
SlavZgr
10.04.2020
Запиши доменное имя компьютера, зарегистрированного в домене первого уровня образование, в домене второго уровня flowers и имеющего собственное имя www. ответ: ...
rendly21
04.11.2022
Середовище виконання: IDLE (Python) Створіть вікно з характеристиками на Ваш вибір. Створіть кнопку з характеристиками на Ваш вибір. Запрограмуйте кнопку, щоб при натисненні змінювалися...
antoshkaromanov
13.01.2020
Окружающий мир 4класс Плешаков страница 64 67 Составьте план...
asyast26
13.01.2020
Сколька будит два плюз два...
Liliii87644
19.12.2022
предложения: Почему в результате Пунических войн победу одержал Рим?...
MOGZ ответил
Если неизвестное число увеличь на 45, полочится 100....
СДЕЛАЙТЕ ОТКРОЙТЕ СКОБКИ, ПОСТАВИВ ПРЕДЛОЖЕНИЯ ВО ВСЕ ИЗВЕСТНЫЕ ВАС ВРЕМЕНА И ИСПОЛЬЗУЯ...
Сәйкестікті анықтау керек! ...
Каково отношение героя к во веры? Как автор относится к герою? Очарованный странник...
Mum shouted at me yesterday...
Напишите реакции по химии аланина с 1) гидроксидом меди 2) пропанол 2 3) азотная...
Осы патшалықтардың сипатаңыз Бактерия өсімдіктер Жануарлар Санырауқұлақтар...
Какие произведения Твардовского посвящены теме Великой Отечественной войны?...
Тау кен өндірісі қоршаған ортаға тигізетін зардабын атаңыз Тауып беріндерші отиниш...
1. Укажите, в каком предложении нужно поставить только одну запятую (знаки препинания...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
#include <cstring>
int
main(void)
{
enum
{
MAX_BUF_SIZE = 100
};
char buf[MAX_BUF_SIZE];
scanf("%s", buf);
int n = strlen(buf);
int shift = 0;
for (int i = 0; i < n; i++) {
shift = (shift + buf[i] - '0') % 3;
}
shift = 3 - shift;
int sel = -1;
for (int i = 0; i < n; i++) {
int tmp = buf[i] - '0' + shift;
if (0 <= tmp && tmp <= 9) {
sel = i;
break;
}
}
if (sel == -1) {
for (int i = n - 1; i >= 0; i++) {
int tmp = buf[i] - '0' - shift;
if (0 <= tmp && tmp <= 9) {
buf[i] -= shift;
break;
}
}
} else {
buf[sel] += shift;
while ('0' <= buf[sel] + 3 && buf[sel] + 3 <= '9') {
buf[sel] += 3;
}
}
printf("%s\n", buf);
return 0;
}