Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии.чертёжник может выполнять команду сместиться на (a, b), где a, b – целые числа. эта команда перемещает чертёжника из точки с координатами (x,y) в точку с координатами (x + a, y + b). например, если чертёжник находится в точке с координатами (4, 2), то команда сместиться на (2, −3) переместит чертёжника в точку (6, −1).циклповтори число разпоследовательность командконец повториозначает, что последовательность команд будет выполнена указанное число раз (число должно быть натуральным).чертёжнику был дан для исполнения следующий алгоритм (число повторений и величины смещения в первой из повторяемых команд неизвестны): началосместиться на (2, 6)повтори …разсместиться на (…, …)сместиться на (1, -2)конец повторисместиться на (-4, 10)конец в результате выполнения этого алгоритма чертёжник возвращается в исходную точку. какое наибольшее число повторений могло быть указано в конструкции «повтори … раз»?
В целях удовлетворения этих потребностей органы государственной власти и органы местного и регионального самоуправления создают информационные службы, системы, сети, базы и банки данных.
Порядок их создания, структура, права и обязанности определяются Кабинетом Министров Украины или другими органами государственной власти, а также органами местного и регионального самоуправления.
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.