Varx, a:real;beginread(a,x);if (a-10>0)thenwriteln(F=,0.2*sqr(sin(x))*ln(a-10))elsewriteln(ln(,a-10,)!!!);
Если ответ по предмету Другие предметы отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.