Для произвольного значения аргументов вычислить значения функции на PascalABC:
f = {k+корень m, если m>0;
{k/m+2, в противном случае
Ответы
Ответ дал:
0
var k,m:single;
begin
write('Введиет число K= '); readln(k);
write('Введите число M= '); readln(m);
if m>0 then writeln('f=(',k+sqrt(m):0:2,')')
else writeln('f=(',k/m+2:0:2,')');
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад