В данной символьной строке,состоящей из цифр,удвойте каждую кратную трем цифру. Например,строка "653" преобразуется в строку "66533" Исполните программу для строк: а)12457 б)56733 в)63936 Нужно построить алгоритм и составить программу.На программе Qbasic.

Ответы:
Андрей Руснак
27-11-2015 19:46

CLS INPUT a$ L = LEN(a$) i = 1 DO WHILE i < L + 1    s$ = MID$(a$, i, 1)    c = VAL(s$)    IF c 3 = c / 3 THEN       a$ = LEFT$(a$, i) + s$ + RIGHT$(a$, L - i)       L = L + 1       i = i + 1    END IF    i = i + 1 LOOP PRINT a$

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «В данной символьной строке,состоящей из цифр,удвойте каждую кратную трем цифру. Например,строка "653" преобразуется в строку "66533" Исполните программу для строк: а)12457 б)56733 в)63936 Нужно построить алгоритм и составить программу.На программе Qbasic.» от пользователя Dasha Larchenko в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!