значения переменных будут меняться такa=8b=30a=80ответ a=80
salahovta
24.02.2021
Ятак поняла вопрос в том, что надо объяснить работу программы. ответ будет выводиться в зависимости от введеных значений переменных. переменная 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); вроде всё
Nefedova1432
24.02.2021
Program p1; uses crt; const n = 5; m = 3; var x: array [1..n,1..m] of integer; j,i,z,k: integer; begin read(z); for i: =1 to n do begin for j: =1 to m do begin x[i,j]: = random (5)-2; write(x[i,j]: 4); end; writeln; end; for i: =1 to n do begin k: =0; for j: =1 to m do begin if (x[i,j]> =0) and (x[i,j] = z)then k: = k+1; end; writeln('кол-во повторений =',k,' в ',i,' строке'); end; end.
значения переменных будут меняться такa=8b=30a=80ответ a=80