Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник - id699454620210820 от BegimaiAnarkulova 20.08.2021 16:00

Question

Информатика: Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа), перемещающую чертёжника из точки с координатами (x, y), в точку с координатами (x+a, y+b). если числа a, b положительные, значение соответствующей координаты увеличивается, если отрицательные — уменьшается. например, если чертёжник находится в точке с координатами (1, 1), то команда сместиться на (–2, 4) переместит его в точку

BegimaiAnarkulova · Accepted Answer

var    a: integer;begin    {1}    readln(a);    if a 0 then a := a + 1;    writeln(a);        {2}    readln(a);    if a 0 then a := a * 2;    writeln(a);        {3}    readln(a);    if a 0 then a := a - 4;    writeln(a);        {4}    readln(a);    if a 0 then a := a + 1    else a := a - 1;    writeln(a);        {5}    readln(a);    if a = 0 then a := a + 3    else a := 0;    writeln(a);end.{6}var    x, y: real;begin    readln(x, y);    if x y then x := x * y    else x := x + y;    writeln(x);end....

MOGZ ответил