Переведите  на Паскаль ABC пожалуйста:x - исследуемое числоизменяется от 16 до

Переведите на Паскаль ABC пожалуйста:

x - исследуемое число
меняется от 16 до 16*16/2-1=127
к - счетчик
а - младший символ 16-ричной записи числа х
b - старший символ 16-ричной записи числа х
c - младший символ 16-ричной записи числа 2х
d - старший символ 16-ричной записи числа 2х

k:=0
цикл по х от 16 до 127

b:= целое(х/16)
a:=x-16*b
d:= целое(2*х/16)
c:=2*x-16*b
если a+b = c+в то k:=k+1

ответ к

Эльвира Охинковская 2019-07-17 23:30:51

В четвертой снизу строке ошибка, чтоб "с" было младшим знаком, как описано в условии, надобно 16 множить на d, а не на b.