uses crt; 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.
1) я заполонил весь мир, я есть у каждого, ты видишь меня каждый день и может бы ть благодаря меня просыпаеншьсяи всегда общаешься. 2) Я первое удобное устройсво для переноса файлов, но меня у тебя уже сожет и не быть, потмучто я не могу знать больше пол гига( или сколько там максимум было) 3)Я бываю разная, для разногг нужны, имею так же хвост бывает даже 2м, на глаза мои моджно нажать, а нос покрутить как колесо, а пузо трёться о стол. 4) бываю офисный компютерный, журнальный и документный, а ещё рабочим. 5В меня ты многое запишешь но я не бесконечно, могу быть разной по размеру, бываю для спецаольных вещей, например для записей и учителей., 6) в меня все маленькие дети хотят, но повзраслев начинают не навидеть и в мечтах у многих спалить. орфографию лень проверять)
Всего в Scratch три разновидности цикла. Это блоки "повторять всегда", "повторить … раз", "повторять пока не …".
Объяснение: