Ввести четырехзначное число.Заменить в нем первую цифру на разность первой и последней цифр,если разность положительна
НА Q BASIC.
СРОЧНООООО ПОМОГИТЕ ПОЖАЛУЙСТА(((((
Ответы на вопрос
Ответил an602
0
Я ПЛОХО ЗНАЮ ЭТОТ ЯЗЫК, НО ПРОГРАММА РАБОТАЕТ:
INPUT "x=";x
INPUT "y=";y
INPUT "z="; z
INPUT "t="; t
s=1000*x+100*y+10*z+t
n=x-t
IF x>t then s=t*1000+y*100+z*10+x
PRINT s
INPUT "x=";x
INPUT "y=";y
INPUT "z="; z
INPUT "t="; t
s=1000*x+100*y+10*z+t
n=x-t
IF x>t then s=t*1000+y*100+z*10+x
PRINT s
Новые вопросы