Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Работы полностью)) / 6.4.1(#22) / Отчет
.docxОтчет по работе 6.4.1 №22
Задание
Составить программу, которая находит наибольшее значение отношения трехзначного числа к сумме его цифр.
Код работы:
CLS
COLOR 10.7
k = 0
FOR i = 100 TO 999 STEP 1
c = i MOD 10
a = i / 100
a = FIX(a)
q = a * 100
q = i - q
b = q / 10
b = FIX(b)
z = a + b + c
c = i / z
IF k < c THEN
k = c
END IF
NEXT
PRINT "NAIBOLSHEE CHISLO PRI DELENII NA SUMMU CIFR TREHZNACHNOGO CHISLA="; k
Скриншот программы с ответом:
Соседние файлы в папке 6.4.1(#22)