Ответ на задание:
Можно выбрать любую точку координатной плоскости в качестве одной из вершин. Один из четырех возможных вариантов программы: Использовать Чертежник
Поднять перо
Сместиться в точку (4,4)
Опустить перо
Сместиться на вектор (0,4)
Сместиться на вектор (3, 0)
Сместиться на вектор (0, -4)
Сместиться на вектор (-3, 0)
Нужно составить вопросы? И на какую тему?
1741338 держи
........................................
Program test;
var s,s1:string;z:boolean;
begin
readln(s);
readln(s1);
z:=s.Contains(s1);
if z = true then writeln('В слове "',s,'" содержиться слово "',s1,'".')
else writeln('В слове "',s,'" не содержиться слово ',s1,'".');
<span>end.</span>
Program n1;
var i: integer;
begin
for i:=1 to 9 do if i mod 2<>0 then writeln(i);
end.