Перевести с паскаля на кумир var  a: array[1..5] of integer;   i: integer; begin  for i: = 1 to 5 do  begin    write('введите ', i, '-ый элемент массива ');     readln(a[i]);   end;   write('исходный массив: ');   for i: = 1 to 5 do    write(a[i], ' ');   writeln;   write('полученный массив: ');   for i: = 1 to 5 do    write(a[i]*2, ' '); end.подробнее - на -

ответ на python:

x1,y1,x2,y2,x3,y3 = -3,3,-3,-3,3,-3 #координаты вершин треугольника

print("Введите xp,yp:")

xp,yp = map(float, input().split()) #ввод с клавиатуры

#Векторные произведения

c1 = (x2-x1)*(yp-y1)-(y2-y1)*(xp-x1)

c2 = (x3-x2)*(yp-y2)-(y3-y2)*(xp-x2)

c3 = (x1-x3)*(yp-y3)-(y1-y3)*(xp-x3)

#Если меньше 0, то точка внутри треугольника, иначе точка вне треугольника или лежит на стороне.

if (c1<0 and c2<0 and c3<0) or (c1>0 and c2>0 and c3>0):

   print("Точка принадлежит треугольнику.")

else:

   print("Точка НЕ принадлежит треугольнику.")

если на C++, то вот процедуры:
если с библиотеки graphics.h
x и y нужно передавать левого верхнего угла буквы

#include <graphics.h>
#include <stdio.h>
#include <conio.h>
int x=50,y=50;
void M(int x,int y)
{ // длина буквы 44, высота тоже 44
x+=50;
line(x,y,x,y+44);
line(x,y,x+22,y+44);
line(x+22,y+44,x+44,y);
line(x+22,y+44,x+44,y+44);
}
void I(int x,int y)
{ // длина буквы 22, высота тоже 44
x+=28;
line(x,y,x,y+44);
line(x,y+44,x+22,y);
line(x+22,y,x+22,y+44);
}
void R(int x,int y)
{ // длина буквы 22, высота тоже 44
x+=28;
line(x,y,x,y+44);
line(x,y,x+22,y);
line(x,y+22,x+22,y+22);
line(x+22,y,x+22,y+22);
}

main()
{
initwindow(800,600);
M(x,y); I(x,y); R(x,y);
x=50;y=100;
R(x,y); I(x,y); M(x,y);
x=50;y=150;
M(x,y); I(x,y); M(x,y);
getch();
closegraph();
}

P.S. я старался