Массив + цикл, счётчик

@R3104d · Регистрация: 25.09.2012

Студворк — интернет-сервис помощи студентам

Всем привет! ребята помогите пожалуйста с кодом! Нужно в консольке с использованием массива(100,100) и цикла сделать такую штуку!
Большое Спасибо!

@~~JoraVoenyjHaker~~ · 11.11.2013, 07:31

лови только что написал там если доработать
то какую угодно картинку можно сделать )))

Visual Basic

Sub ConsolePrim()
    Dim fso As Object
    Dim f&, f1&, s$, fn$
    Set fso = CreateObject("Scripting.FileSystemObject")
    s = s & "Echo off" & vbCrLf
    s = s & "cls" & vbCrLf
    For f = 1 To 10
        s = s & "Echo "
        For f1 = f1 To f1 + 9
            s = s & CStr(f1) & " "
        Next
        s = s & vbCrLf
    Next
    s = s & "pause "
    fn = Environ("temp") & "\tmp.cmd"
    fso.CreateTextFile(fn).Write (s) 'создание временного файла
    Shell fn, vbNormalFocus
'    fso.DeleteFile (fn) 'удаление временного файла
End Sub

Не по теме:

Если ты темой не ошибся, и модераторы не
переместят её то я думаю это хороший пример
демонстрирующий работу VB + консоли

@~~JoraVoenyjHaker~~ · 11.11.2013, 08:11

так пойдет ?...

@~~Апострофф~~ · 11.11.2013, 08:44

Заполнить массив последовательными натуральными числами, идущими по спирали

@~~JoraVoenyjHaker~~ · 11.11.2013, 08:57

R3104d обрати внимание на мою поделку
и на ссылку от Апострофф великого человека !

прикрути одно к другому и у тебя получиться... )))

@R3104d · 11.11.2013, 11:39 **[ТС]**

Огромное спасибо ребята!

@R3104d 1 / 1 / 0 Регистрация: 25.09.2012 Сообщений: 12
		1
	Массив + цикл, счётчик 11.11.2013, 01:50. Показов 1107. Ответов 5 Метки нет (Все метки) Всем привет! ребята помогите пожалуйста с кодом! Нужно в консольке с использованием массива(100,100) и цикла сделать такую штуку! Большое Спасибо! Изображения 0

@~~JoraVoenyjHaker~~ Заблокирован
	11.11.2013, 08:11	3
	так пойдет ?... Миниатюры 1

@~~Апострофф~~ Заблокирован
	11.11.2013, 08:44	4
	Сообщение было отмечено как решение Решение Заполнить массив последовательными натуральными числами, идущими по спирали 3

@~~JoraVoenyjHaker~~ Заблокирован
	11.11.2013, 08:57	5
	R3104d обрати внимание на мою поделку и на ссылку от Апострофф великого человека ! прикрути одно к другому и у тебя получиться... ))) 1

@R3104d 1 / 1 / 0 Регистрация: 25.09.2012 Сообщений: 12
	11.11.2013, 11:39 [ТС]	6
	Огромное спасибо ребята! 0

Опции темы

Массив + цикл, счётчик

Решение