Ответ:
Program ship;
Uses crt,graph;
Var gd,gm: integer;
Begin
gd:=detect;
Initgraph(gd,gm,'');
Line(100,300,400,300);
Line(150,380,350,380);
Line(100,300,150,380);
Line(400,300,350,380);
Line(250,300,250,180);
Line(250,180,340,230);
Line(340,230,250,280);
Setfillstyle(9,blue);
Floodfill(160,340,15);
Setfillstyle(3,lightgreen);
Floodfill(270,210,15);
Readkey;
Closegraph;
End.
Объяснение:
Отмечай словесное описание
<span>и формулу</span>. Рисунок и фотография будут графическими моделями.
И че дальше я не понял задание
<span>Кодированием числовой информации:называется совокупность приемов наименования и записи чисел.</span>
TDM-GCC 4.9.2 64-bit Release
#include <iostream>
#include <cstdlib>
#include <cmath>
int main(int argc, char *argv[])
{
system("chcp 1251 >nul");
setlocale(LC_ALL, "Russian");
int n;
scanf("%d",&n);
int mas[n], sum = 0, temp = 0;
for(int i = 0; i < n; i++)
{
scanf("%d",&mas[i]);
temp = abs(mas[i]);
while(temp >= 10)
{
sum += temp % 10;
temp /= 10;
}
sum += temp;
}
printf("%d",sum);
return EXIT_SUCCESS;
}