Переведите из питона в паскальdefvert(ch,m):""""""""""""if(ch//10==m %10) and (ch%10==

Переведите из питона в паскаль

defvert(ch,m):
""""""""""""
if(ch//10==m %10) and (ch%10== m//10)
return 1
else:
return 0
tmp=str (input())
ch=int(tmp[0])*10+int(tmp[1])
m=int((tmp[3])*10+int(tmp[4])
"""print (ch,m)"""
vr=0
whilenotvert(ch,m):
m+=1
vr+=1
if m==60
m=0
ch+=1
ifch==24
ch=0
print(vr)

Мария Регулярная 2019-06-08 12:50:27

Вы поначалу нормально текст отформатируйте.

Ромик Минев 2019-06-08 12:56:35

Или приложите скрин, либо файл