Определите значение переменной «a» после выполнения фрагмента программы:a = 10 if a 5: a += 12 else: a -= 7 if a > 5: a += 12 else: a -= 7 ( : 1) 5.Определите значение переменной «a» после выполнения фрагмента программы: a = 10 if a b: b += 12 else: a -= 7 if a > b: a += 12 else: a -= 7 ( : 1) 8. Определите значение переменной «a» после выполнения фрагмента программы
var a,b,c,d,x:real;
begin
clrscr;
writeln('введите A,B,C');
readln( a,b,c );
d:=sqr(b)-4*a*c;
if d<0 then
writeln('действительных корней нет')
else if d=0 then
begin
x:=(-b)/2*a;
writeln('корень уравнения: ',x);
end else
begin
x:=(-b+sqrt(d))/2*a;
writeln('1-ый корень уравнения: ',x);
x:=(-b-sqrt(d))/2*a;
writeln('2-ой корень уравнения: ',x);
end
end.
P.S. Надеюсь на благодарность и лучший ответ.
2) Я первое удобное устройсво для переноса файлов, но меня у тебя уже сожет и не быть, потмучто я не могу знать больше пол гига( или сколько там максимум было)
3)Я бываю разная, для разногг нужны, имею так же хвост бывает даже 2м, на глаза мои моджно нажать, а нос покрутить как колесо, а пузо трёться о стол.
4) бываю офисный компютерный, журнальный и документный, а ещё рабочим.
5В меня ты многое запишешь но я не бесконечно, могу быть разной по размеру, бываю для спецаольных вещей, например для записей и учителей.,
6) в меня все маленькие дети хотят, но повзраслев начинают не навидеть и в мечтах у многих спалить.
орфографию лень проверять)