Полное имя скопированного файла f.txt из диска с: каталога кr на диск d: в каталог sm каталога тpкакой вариант правильный? d: \tp\sm\kr\f.txtd: \tp\sm\f.txtd: \sm\tp\kr\f.txtd: \sm\kr\tp\f.txt
243
386
Ответы на вопрос:
Var a,b,c,d,e,f,g,x1,x2: real; begin write('введите значения e,f,g: '); readln(e,f,g); a: =sqrt(abs(sqr(e)-g)/3); writeln('a= ',a: 0: 5); b: =abs((e-f)/7); b: =b*sqr(b)-cos(g); writeln('b= ',b: 0: 5); c: =f*sqr(f)-g/17; writeln('c= ',c: 0: 5); d: =sqr(b)-4*a*c; if d< 0 then writeln('действителных корней нет') else if d=0 then begin x1: =(-b-sqrt(d))/(2*a); x2: =x1; writeln('x1=x2= ',x1: 0: 5) end else begin x1: =(-b-sqrt(d))/(2*a); x2: =(-b+sqrt(d))/(2*a); writeln('x1= ',x1: 0: 5,', x2= ',x2: 0: 5) end end. тестовое решение: введите значения e,f,g: 2 -3 -3 a= 1.52753 b= 1.35442 c= -26.82353 x1= -4.65721, x2= 3.77053
Популярно: Информатика
-
данна1608.09.2021 21:43
-
helissieble11.04.2022 06:50
-
osipolara17.01.2023 07:22
-
IvanPAW214577810.01.2020 13:37
-
SSultanShaS02.10.2020 12:00
-
danilf99905.06.2022 17:46
-
woonov148804.04.2020 13:55
-
Bog120911.07.2020 02:43
-
Дарья431122.02.2023 03:34
-
IncolaRO20.08.2020 22:31