Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
7
Добавлен:
22.03.2016
Размер:
41.63 Кб
Скачать

Отчет по работе 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)