Напишите текст программы (любой язык программирования) для решения следующей на пэвм: с клавиатуры вводится строка типа aх=b (например: 3х=6 или 0.2х=-89). определить х.
// PascalABC.NET 3.1, сборка 1267 от 10.07.2016 begin var s:=ReadlnString('>'); var i:=Pos('X=',s); if i>0 then begin Writeln('X=',(s[i+2:].ToReal)/(s[:i].ToReal)) end else Writeln('Контекст X= не найден') end.
begin
var s:=ReadlnString('>');
var i:=Pos('X=',s);
if i>0 then begin
Writeln('X=',(s[i+2:].ToReal)/(s[:i].ToReal))
end
else Writeln('Контекст X= не найден')
end.
Тестовое решение
> 0.2X=-89
X=-445