Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Помогите плиз:))

10-11 класс

В Visual Basic .

умниквкедах 08 мая 2013 г., 10:42:43 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Cана77
08 мая 2013 г., 13:42:43 (10 лет назад)

Sub z()
Dim mc(5, 5)
For i = 1 To 5
    For j = 1 To 5
        mc(i, j) = Int(Rnd * 10)
        s = s & mc(i, j) & " "
        sum = sum + mc(i, j)
    Next j
    s = s & "sum=" & sum & Chr(13)
    sum = 0
Next i
MsgBox (s)
End Sub

Ответить

Другие вопросы из категории

5. Найдите значение переменной z после исполнения серии команд:

а: =8

б: =а*4

z: =б-28

а: =5

б: = а*2

z: = а*b

с: =10

d:= c/2

z: =с-d

в: = 6

а: = в * в

z: =а-в


Помогите решить задачи на паскале

1)Дано четырехзначное число N. Проверить,будет ли сумма его цифр четным числом.
2)Ввести целое число n и, если оно трехзначное,найти его цифры, в противном случае напечатать сообщение"Не могу найти цифры"

Читайте также

Помогите плиз решить ничего не понимаю заранее спасибо

1.Сколько раз будет выполнена команда повторения в приведенных фрагментах при n=7:
1) for i :=n downto 4 do;
2)S:=S * i.
2. Определите, какой будет результат приведенного фрагмента: a:=100, n:=4:
for i:=1 to n do
a:=a - 2 * i.
Очень важно помогите.

Помогите плиииз=)

Привет. Помогите плиз=)
№1)Составить алгоритм вывода среднего(не арифметического) из трёх чисел в виде блок-схемы.
Входные данные:три числа
Выходные данные:среднее число

№2) На вход подаётся число. Нужно вывести числа от данного до 10. Если оно изначально больше 10, завершить программу.

помогите плиз сделать 2,3,4)))


Вы находитесь на странице вопроса "Помогите плиз:))", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.