~нужно 1. составить программу нахождения площади ромба, если известны стороны и диагонали. (паскаль. если не трудно, то можно объяснить, как сделать программу) 2. 16x^4-√x (паскаль) 16sqr(sqr((x))
1. Не знаю, как совместить стороны и диагонали в одном решении, сделал нахождение по диагоналям.
var d1, d2, S: real; begin write('Введите диагонали d1 и d2'); readln(d1, d2); if(d1>0) and (d2>0) then begin S:=(d1*d2)/2; writeln('Площадь равна: ', S) end else writeln('Условия неверны!') end.
Чтобы написать, достаточно знать основы паскаля. Если есть вопросы к какой-либо строке - напиши.
var d1, d2, S: real;
begin
write('Введите диагонали d1 и d2');
readln(d1, d2);
if(d1>0) and (d2>0) then
begin
S:=(d1*d2)/2;
writeln('Площадь равна: ', S)
end
else
writeln('Условия неверны!')
end.
Чтобы написать, достаточно знать основы паскаля. Если есть вопросы к какой-либо строке - напиши.
2. 16*sqr(sqr(x))-(sqrt(x))