Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 8. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – максимальное число, оканчивающееся на 8.Возможно ли это написать в Visual Basic? Если да,то как?

9 Мар 2020 в 19:52
238 +1
0
Ответы
1

Да, это возможно написать на Visual Basic.

Пример кода:

Module Module1
Sub Main()
Dim n As Integer
Console.Write("Введите количество чисел в последовательности: ")
n = Convert.ToInt32(Console.ReadLine())
Dim maxNum As Integer = 0
Dim currentNum As Integer
For i As Integer = 1 To n
Console.Write("Введите число: ")
currentNum = Convert.ToInt32(Console.ReadLine())
If currentNum Mod 10 = 8 AndAlso currentNum > maxNum Then
maxNum = currentNum
End If
Next
Console.WriteLine("Максимальное число, оканчивающееся на 8: " & maxNum)
End Sub
End Module

Эта программа запрашивает у пользователя количество чисел в последовательности, затем вводит числа и находит максимальное число, оканчивающееся на 8.

18 Апр 2024 в 16:20
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир