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

Отчет по работе №2.20(В)

Задание

Код работы:

CLS

COLOR 10.7

INPUT "Vvedite chetirehznachnoe chislo=", i

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

j = i / 1000

j = FIX(j)

l = a MOD 10

PRINT "Chislo obrazuemoe pri perestanovke 2 i 3 cifr="; j; b; l; c

Скриншот программы с ответом:

Соседние файлы в папке 2.20(В)