Var
X,b:real;
Begin
WriteLn('y=7x/(3x-12)');
Write('X = ');ReadLn(X);
WriteLn('Y = ',7*X/(3*X-12));
WriteLn;
WriteLn('y=4x/(2,6-b)');
Write('X = ');ReadLn(X);
Write('b = ');ReadLn(b);
WriteLn('Y = ',4*X/(2.6-b));
End.
1) Щелкнуть левой клавишей мышки по кнопке "Пуск" в левом нижнем углу экрана.
2) Нажать на клавиатуре кнопку "Windows" с изображением флажка. Обычно она находится рядом с кнопкой "Alt".
3) Нажать одновременно кнопки клавиатуры "Ctrl" + "Esc".
Исходник и пример работы в приложении.
4 функции (для каждой неизвестной) описаны в главной программе main, следовательно такая конструкция подходит "на 5" по вашему набору оценок.