Написать программу для решения уравнения ax=b в PascalABC

Question

Информатика

Лота

18 сентября, 21:04

Написать программу для решения уравнения ax=b в PascalABC

+3

Ответы (1)

Знаете ответ на вопрос?

Ростяна · Answer 1

Program n1;

var a, b: real;

begin

write ('a=') ;

readln (a) ;

write ('b=') ;

readln (b) ;

writeln ('решается уравнение ', a,'x=', b) ;

writeln ('x=', b,'/', a,'=', b/a) ;

end.