Ятак поняла вопрос в том, что надо объяснить работу программы. ответ будет выводиться в зависимости от введеных значений переменных. переменная m типа boolean, т.е. это логическая переменная; которой может быть присвоенно только 2 значения, либо true, либо false, т.е. либо логическое вырожение истинное, либо ложное. если в конце программы добавить writeln(m), тогда выведиться либо слово true, либо false. не знаю, случайно ли, но в программе есть опечатки и в таком виде она работать не будет. 1. после program bd; ставиться точка с запятой, а не просто запятая. 2. не car, a var 3. после объявления переменных, перед указанием их типа надо ставить двоеточие (: ), а не точку с запятой (; ) 4. после m необходимо поставить двоеточие (m: boolean; ) 5. в операторе ввода read, нельзя ставить апостровы. если вы хотите ввести значения, неоходимо просто через запятую их написать readln(a,b); ну и как я уже сказала, если вы хотите вывести результат выполнения программы, перед end. вставьте оператор writeln(m); вроде всё
smnra219
11.05.2023
Вvisual basic на форме нужно создать текстовое поле label1 со свойством wordwrap = true, то есть многострочное поле, размер нужно задать, чтобы поместилась вся матрица. sub matrix dim f() as integer ' объявляем динамический массив dim m as integer, i as integer, k as integer, t as string ' и переменные m = inputbox ("vvedite razmer matrix") ' задаем размер массива redim f(m, m) ' определяем размер массива for i = 1 to m ' ввод данных for k = 1 to m t = "vvedite element matrix" & str(i) & "," & str(k) f(i, k) = inputbox (t) next k next i for i = 1 to m f(i, i) = 0 ' обнуляем элементы главной диагонали. next i for i = 1 to m for k = 1 to m ' вывод строки данных через табуляцию label1.caption = label1.caption & f(i, k) & chr(9) next k label1.caption = label1.caption & vbcrlf ' переход на следующую строку next i end sub
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Какой минимальный объём видеопамяти необходим для хранения четырехцветного изображения, если разрешающая способность дисплея 640 на 200
точно не знаю,но около 8мб