Валентин
4 год назад
Написать программу нахождения значения выражения ОЧЕНЬ СРОЧНО!!
ОТВЕТЫ
Pierce Alban
Oct 24, 2020
//PascalABC.Net 3.2
begin
var a:=readreal ('Введите a: ');
var b:=readreal ('Введите b: ');
if a>0 then write ('y=', sqrt((5*a*sqr(b)+6)/(25*a))) else write ('a<=0');
end.
begin
var a:=readreal ('Введите a: ');
var b:=readreal ('Введите b: ');
if a>0 then write ('y=', sqrt((5*a*sqr(b)+6)/(25*a))) else write ('a<=0');
end.
779
Смежные вопросы:
