От раз­вед­чи­ка была по­лу­че­на сле­ду­ю­щая шиф­ро­ван­ная ра­дио­грам­ма, пе­ре­дан­ная с ис­поль­зо­ва­ни­ем аз­бу­ки Морзе: • – – • • • – • • – – • • – • • – • – –При пе­ре­да­че ра­дио­грам­мы было по­те­ря­но раз­би­е­ние на буквы, но из­вест­но, что в ра­дио­грам­ме ис­поль­зо­ва­лись толь­ко сле­ду­ю­щие буквы:АДЛТЖ•–– ••• – ••–••• – Рас­шиф­руй­те ра­дио­грам­му. За­пи­ши­те в от­ве­те рас­шиф­ро­ван­ную ра­дио­грам­му.​

Радиограмма расшифровывается однозначно: AДЛТДТАТ

АДЛТДДТАТ

Объяснение:

Здесь подробное объяснение:

Среднее значение округляется до целого(дробная часть отсекается)

#include <iostream>
using std::cout;
using std::cin;
using std::endl;

int main()
{
    int a[10];
    int sum = 0;

    cout << "Enter the growth of ten people:" << endl;

    for(int i = 0; i < 10; i++)
    {
        cin >> a[i];

        sum += a[i];
    }

    cout << "\nThe total growth of all people equal to " << sum << "sm"
        << "\nThe average growth of all people equal to " << (sum / 10) << "sm" << endl;

    return 0;
}

Вот моя прога, 2 года назад писал и не потерял)) Тут по нажатию на форму рисуется паутина как бы центр там куда ты нажала. Вообщем думаю разберешься, если что - пиши.

Public Class Form1
Dim x, y As Integer
Sub pau(ByVal gr As Graphics, ByVal x As Integer, ByVal y As Integer)
Dim i, w, h As Integer
gr.Clear(Color.White)
w = ClientRectangle.Width / 2
h = ClientRectangle.Height / 2
For i = 0 To 2
gr.DrawLine(Pens.BurlyWood, New Point(w * i, 0), New Point(x, y))
gr.DrawLine(Pens.BurlyWood, New Point(w * i, h * 2), New Point(x, y))

Next
gr.DrawLine(Pens.BurlyWood, New Point(0, h), New Point(x, y))
gr.DrawLine(Pens.BurlyWood, New Point(w * 2, h), New Point(x, y))
End Sub
Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
Dim gr As Graphics = Me.CreateGraphics

x = e.X
y = e.Y
pau(gr, x, y)
End Sub

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim gr As Graphics = e.Graphics
pau(gr, x, y)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
x = 100
y = 230
End Sub
End Class