Для определённости, пусть есть мини-таблица, где в ячейках верхней строки- названия этих переменных (x, y, z).
В нижней строке, в ячейки под икс и игрек- вводите числа- значения этих двух переменных, а в ячейку под зет- вводите формулу для вычисления значения этого выражения:
=(1+x)/4/y
Только вместо x и y вводим ссылки на ячейки с этими значениями.
Можно чуть по другому её записать, если хотите:
=(1+x)/(4*y)
После набора формулы вводите её нажатием клавиши Enter, и в этой ячейке вычислится и отобразится значение зет.
Уточнение: в формуле вместо букв x и y надо вставлять ссылки на ячейки, в которых находятся значения переменных x и y. Можно конечно сделать чтобы напрямую работала указанная формула с буквами x и y, но для этого надо задать такие имена ячейкам, содержащим значения этих переменных, тогда будет работать.
Program a1; var a,b: array [1..10] of integer; n,i,k,sum,c: integer; begin Randomize; For i:=1 to 10 do begin a[i]:=random(100); write(a[i]:3); end; Readln (n); For i:=1 to 10 do begin k:=a[i]; while k>0 do begin sum:=sum+(k mod 10); k:=k div 10; end; f (n=sum) then begin inc(c); b[c]:=a[i]; end; end; for i:=1 to c do write(b[i]:2); end.
Для определённости, пусть есть мини-таблица, где в ячейках верхней строки- названия этих переменных (x, y, z).
В нижней строке, в ячейки под икс и игрек- вводите числа- значения этих двух переменных, а в ячейку под зет- вводите формулу для вычисления значения этого выражения:
=(1+x)/4/y
Только вместо x и y вводим ссылки на ячейки с этими значениями.
Можно чуть по другому её записать, если хотите:
=(1+x)/(4*y)
После набора формулы вводите её нажатием клавиши Enter, и в этой ячейке вычислится и отобразится значение зет.
Уточнение: в формуле вместо букв x и y надо вставлять ссылки на ячейки, в которых находятся значения переменных x и y. Можно конечно сделать чтобы напрямую работала указанная формула с буквами x и y, но для этого надо задать такие имена ячейкам, содержащим значения этих переменных, тогда будет работать.