Вvba дана строка s и число n. преобразовать строку s в строку длины n следующим образом: если длина строки s больше n, то отбросить первые символы, если длина строки s меньше n, то в ее начало добавить символы "." (точка).

293

414

Посмотреть ответы 3

Ответы на вопрос:

щгоот

Информатика

4,7(94 оценок)

Sub aaa() s = inputbox("введите строку") n = cint(inputbox("введите длину n")) m = len(s) if m > n then s = right(s, n) else if m < n then s = string(n - m, ".") + s end if msgbox "результат: " + s, vbinformation end sub

vprasckowya

Информатика

4,7(67 оценок)

Sub str_4() on error goto handler dim s as string dim n as integer s = inputbox("stroka? ") n = inputbox("chislo? ") if len(s) > n then s = right(s, n) while len(s) < n s = "." + s wend msgbox (s) end handler: msgbox "oshibka! " end sub