Вопрос задан 09.05.2019 в 05:03. Предмет Информатика. Спрашивает Худоёрова Вазира.

Построить алгоритм(нарисовать блок-схему) и составить программу , считающую средний рост детей в

visual basic. Ввод данных осуществлять с клавиатуры.
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Кострик Алинка.

Вашу программу я сделал. 

Ссылку отправляю в лс. 

так как по не понятным причинам удалили пост.

Уважаемые модераторы, сюда не можно залить файлы проекта визуал бейсика..и как быть?

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Я могу помочь вам с вашим заданием по программированию на Visual Basic. Вот алгоритм и код программы, которые вычисляют средний рост детей, вводимых с клавиатуры.

Алгоритм:

``` Начало Объявить переменные n, sum, height, average как вещественные Присвоить n = 0, sum = 0 Вывести "Введите рост ребенка в сантиметрах или 0 для завершения ввода" Ввести height Пока height не равно 0 Увеличить n на 1 Увеличить sum на height Вывести "Введите рост ребенка в сантиметрах или 0 для завершения ввода" Ввести height Конец цикла Если n > 0 Вычислить average = sum / n Вывести "Средний рост детей равен", average, "сантиметров" Иначе Вывести "Нет данных для расчета" Конец условия Конец ```

Код программы:

```vb Dim n As Double, sum As Double, height As Double, average As Double n = 0 sum = 0 Console.WriteLine("Enter the height of a child in centimeters or 0 to end input") height = Console.ReadLine() While height <> 0 n = n + 1 sum = sum + height Console.WriteLine("Enter the height of a child in centimeters or 0 to end input") height = Console.ReadLine() End While If n > 0 Then average = sum / n Console.WriteLine("The average height of children is " & average & " centimeters") Else Console.WriteLine("No data for calculation") End If ```

Надеюсь, это поможет вам. Удачи! Ответь+подробно.+Построить+алгоритм(нарисовать+блок-схему)+и+составить+программу+,+считающую+средний+рост+детей+в+visual+basic.+Ввод+данных+осуществлять+с+клавиатуры.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос