Дискуссионный математический форумМатематический форум
Математический форум Math Help Planet

Обсуждение и решение задач по математике, физике, химии, экономике

Теоретический раздел
Часовой пояс: UTC + 3 часа [ Летнее время ]
новый онлайн-сервис
число, сумма и дата прописью

Часовой пояс: UTC + 3 часа [ Летнее время ]




Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: Текстовый конвертер
СообщениеДобавлено: 03 ноя 2019, 04:12 
Не в сети
Light & Truth
Зарегистрирован:
10 дек 2013, 02:33
Сообщений: 2647
Cпасибо сказано: 211
Спасибо получено:
331 раз в 322 сообщениях
Очков репутации: 37

Добавить очки репутацииУменьшить очки репутации
Код:

n=93

DIM rus$[n], lat$[n]

ARRAY.LOAD rus$[],  CHR$(10), "*", "†",  "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "•", "!", "?", "(", ")", "-", "«", "»", ":", ";", ".", "–", ",", " ", "а", "б", "в", "г", "д", "е", "ё", "ж", "з", "и", "й", "к", "л", "м", "н", "о", "п", "р", "с", "т", "у", "ф", "х", "ц", "ч", "ш", "щ", "ъ", "ы", "ь", "э", "ю", "я", "А", "Б", "В", "Г", "Д", "Е", "Ё", "Ж", "З", "И", "Й", "К", "Л", "М", "Н", "О", "П", "Р", "С", "Т", "У", "Ф", "Х", "Ц", "Ч", "Ш", "Щ", "Ъ", "Ы", "Ь", "Э", "Ю", "Я"

ARRAY.LOAD lat$[],  CHR$(10), "*", "†", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "•", "!", "?", "(", ")", "-", "«", "»", ":", ";", ".", "–", ",", " ", "a", "b", "v", "g", "d", "e", "ø", "ž", "z", "ı", "j", "k", "l", "m", "n", "o", "p", "r", "s", "t", "u", "f", "x", "c", "č", "š", "ś", "’", "y", "'", "ê", "ū", "ā", "A", "B", "V", "G", "D", "E", "Ø", "Ž", "Z", "I", "J", "K", "L", "M", "N", "O", "P", "R", "S", "T", "U", "F", "X", "C", "Č", "Š", "Ś", "’", "Y", "'", "Ê", "Ū", "Ā"

INPUT "",w$
PRINT w$

FOR j=1 TO LEN(w$)
FOR i=1 TO n
  IF MID$(w$, j, 1)=rus$[i] THEN a$ = a$+lat$[i]
NEXT i
NEXT j

!/////////////////////////////////////////////////


DIM p$[13], q$[4], y$[4]

ARRAY.LOAD p$[], "’", " ", "a", "e", "ø", "ı", "o", "u", "y", "ɛ", "ū", "ā", "'"

ARRAY.LOAD q$[], "e", "ø", "ū", "ā"

ARRAY.LOAD y$[], "ĕ", "ŏ", "ŭ", "ă"

rem n = 13 • 4 = 52

n=52

DIM u$[n], v$[n]

j=0
FOR i=1 TO 13
FOR k=1 TO 4
  j=j+1
  u$[j]=p$[i]+q$[k]
  v$[j]=p$[i]+y$[k]
NEXT k
NEXT i

GOSUB Replace


UNDIM u$[], v$[]


n=11
DIM u$[n], v$[n]

ARRAY.LOAD u$[],  "l'",  "t'",  "s'",  "n'", "d'", "p'", "r'", "m'", "z'", "v'", "b'"


ARRAY.LOAD v$[],  "ļ",  "ț",  "ș",  "ñ", "ḍ", "ṕ", "ŕ", "ṁ", "ẓ", "ṿ", "ḅ"

GOSUB Replace

CLS

PRINT a$

CONSOLE.SAVE "EXPERIMENT.txt"

END

!//////////////////////////////////////

Replace:

s=1
begin:
s=s+2
FOR j=s TO LEN(a$)
FOR i=1 TO n
  IF MID$(a$, j, 2)=U$[i] THEN
   l$=LEFT$(a$, j-1)
   r$=MID$(a$, j+2, LEN(a$)-j-1)
   a$=l$+v$[i]+r$
   s=j
   GOTO begin
  ENDIF
NEXT i
NEXT j

RETURN

Вернуться к началу
 Профиль  
Cпасибо сказано 
 Заголовок сообщения: Re: Текстовый конвертер
СообщениеДобавлено: 03 ноя 2019, 04:21 
Не в сети
Light & Truth
Зарегистрирован:
10 дек 2013, 02:33
Сообщений: 2647
Cпасибо сказано: 211
Спасибо получено:
331 раз в 322 сообщениях
Очков репутации: 37

Добавить очки репутацииУменьшить очки репутации
Цитата:

Гравитация влияет на течение времени

Свет – это волновой процесс, т.е. такой процесс, который повторяется через регулярные интервалы времени. в этом смысле свет представляет собой «часы», которые отбивают удары, преданно следуя ритму источника; частота света равна частоте колебаний излучающего его атома (кстати, современные атомные часы используются именно в качестве источников точного времени). Если внешнему наблюдателю кажется, что на Земле «световые часы» идут медленнее, то во избежание противоречий все земные процессы должны казаться ему протекающими во столько же раз медленнее.

Итак, время течет быстрее в космическом пространстве, чем на поверхности Земли. а на Земле оно течет быстрее на горных вершинах, чем в долинах. Впервые подтверждение этого удивительного явления (с помощью часов) было получено в Турине в Электротехническом институте им. Галилео Феррариса, где мой друг Лещутта использовал в своей работе целую коллекцию точнейших атомных часов, как раз тех, по которым сверяют точное время. Вместе с сотрудниками Лаборатории космогеофизики Национального совета исследований им было проведено сравнение двух идентичных часов, причем одни часы находились в Турине, а другие высоко в горах на Плато Роза; в результате выяснилось, что вторые часы уходили вперед на 30 наносекунд в день (одна наносекунда равна одной миллиардной части секунды). Этот едва заметный эффект породил целую серию остроумных шуток. на самом же деле речь здесь идет о весьма серьезных вещах: подобные эксперименты были поставлены в Мэрилендском университете и Токийской астрономической обсерватории, и полученные результаты оказались в полнейшем согласии с эйнштейновской теорией относительности.

В скором времени вступит в строй навигационная система, использующая спутники связи; в этой системе будет целое созвездие из 24 спутников с атомными часами (водородных мазеров), которые, находясь на орбите, будут передавать по радио свои сигналы во все концы Земли. Местонахождение любого корабля можно будет определять по относительным задержкам принятых сигналов с ошибкой, не превышающей пяти метров. Такая точность может быть достигнута, только если учитывать возникающее согласно принципу относительности различие в течение времени на орбите и на Земле. а для сицилийских рыбаков, например, ежедневно подвергающих себя риску при ловле рыбы вблизи территориальных вод Туниса, пять метров имеют очень большое значение.

Теория относительности уже не является заумной, отвлеченной теорией – она начинает влиять на нашу жизнь посредством неожиданных технических новинок. Как мы говорили, замедление времени на Солнце намного больше, чем на Земле. Это уже давно доказано с помощью спектроскопии. Существуют звезды, на которых эффект еще значительнее: так, например, Сириус на самом деле – это система из двух звезд, Сириуса а и Сириуса В; Сириус в представляет собой так называемый «белый карлик», плотность которого такова, что масса, равная массе Солнца, занимает там объем, равный объему Земли. Относительная задержка времени на этой звезде достигает одной десятитысячной, т.е. приблизительно восьми секунд в сутки.

Пульсар, обнаруженный внутри Крабовидной туманности (M1 по каталогу Мессье, или NGC 1952;) и являющийся остатком взрыва сверхновой около девятисот лет назад, представляет собой следующую стадию еще большего сжатия звездного вещества, а именно «нейтронную звезду», плотность массы которой достигает десяти миллионов тонн на кубический сантиметр. По современным представлениям она имеет форму почти правильной сферы диаметром порядка 20 км, что сравнимо с размерами, например, города Турина. Задержка времени на ее поверхности по сравнению с внешним пространством достигает 10%, а вторая космическая скорость (скорость, которую необходимо превысить для преодоления силы притяжения) достигает 100000 км/с.



Gravıtacıă vlıăet na tečenıĕ vremen

Svet – êto volnovoj process, t.e. takoj process, kotoryj povtorāĕtsā čerez regulārnyĕ ıntervaly vremenı. v êtom smysle svet predstavlāĕt soboj «časy», kotoryĕ otbıvaŭt udary, predanno sleduă rıtmu ıstočnıka; častota sveta ravna častote kolebanıj ızlučaŭśego ĕgo atoma (kstatı, sovremennyĕ atomnyĕ časy ıspoļzuŭtsā ımenno v kačestve ıstočnıkov točnogo vremenı). Eslı vnešnemu nablūdatelū kažetsā, čto na Zemle «svetovyĕ časy» ıdut medlenneĕ, to vo ızbežanıĕ protıvorečıj vse zemnyĕ processy dolžny kazațsā ĕmu protekaŭśımı vo stoļko že raz medlenneĕ.

Itak, vremā tečet bystreĕ v kosmıčeskom prostranstve, čem na poverxnostı Zemlı. a na Zemle ono tečet bystreĕ na gornyx veršınax, čem v dolınax. Vpervyĕ podtverždenıĕ êtogo udıvıteļnogo ăvlenıă (s pomoś'ŭ časov) bylo polučeno v Turıne v Êlektrotexnıčeskom ınstıtute ım. Galıleo Ferrarısa, gde moj drug Leśutta ıspoļzoval v svoĕj rabote celuŭ kollekcıŭ točnejšıx atomnyx časov, kak raz tex, po kotorym sverāŭt točnoĕ vremā. Vmeste s sotrudnıkamı Laboratorıı kosmogeofızıkı Nacıonaļnogo soveta ıssledovanıj ım bylo provedeno sravnenıĕ dvux ıdentıčnyx časov, prıčem odnı časy naxodılıș v Turıne, a drugıĕ vysoko v gorax na Plato Roza; v rezuļtate vyăsnıloș, čto vtoryĕ časy uxodılı vpered na 30 nanosekund v deñ (odna nanosekunda ravna odnoj mıllıardnoj častı sekundy). Êtot ĕdva zametnyj êffekt porodıl celuŭ serıŭ ostroumnyx šutok. na samom že dele reč' zdeș ıdet o veșma seŕĕznyx veśax: podobnyĕ êksperımenty bylı postavleny v Mêrılendskom unıversıtete ı Tokıjskoj astronomıčeskoj observatorıı, ı polučennyĕ rezuļtaty okazalıș v polnejšem soglasıı s êjnštejnovskoj teorıĕj otnosıteļnostı.

V skorom vremenı vstupıt v stroj navıgacıonnaă sıstema, ıspoļzuŭśaă sputnıkı svāzı; v êtoj sısteme budet celoĕ sozvezdıĕ ız 24 sputnıkov s atomnymı časamı (vodorodnyx mazerov), kotoryĕ, naxodāș na orbıte, budut peredavaț po radıo svoı sıgnaly vo vse koncy Zemlı. Mestonaxoždenıĕ lūbogo korablā možno budet opredelāț po otnosıteļnym zaderžkam prınātyx sıgnalov s ošıbkoj, ne prevyšaŭśej pātı metrov. Takaă točnosț možet byț dostıgnuta, toļko ĕslı učıtyvaț voznıkaŭśeĕ soglasno prıncıpu otnosıteļnostı razlıčıĕ v tečenıĕ vremenı na orbıte ı na Zemle. a dlā sıcılıjskıx rybakov, naprımer, ĕžednevno podvergaŭśıx sebā rısku prı lovle ryby vblızı terrıtorıaļnyx vod Tunısa, pāț metrov ımeŭt očeñ boļšoĕ značenıĕ.

Teorıă otnosıteļnostı uže ne ăvlāĕtsā zaumnoj, otvlečennoj teorıĕj – ona načınaĕt vlıăț na našu žızñ posredstvom neožıdannyx texnıčeskıx novınok. Kak my govorılı, zamedlenıĕ vremenı na Solnce namnogo boļše, čem na Zemle. Êto uže davno dokazano s pomoś'ŭ spektroskopıı. Suśestvuŭt zvezdy, na kotoryx êffekt ĕśe značıteļneĕ: tak, naprımer, Sırıus na samom dele – êto sıstema ız dvux zvezd, Sırıusa a ı Sırıusa V; Sırıus v predstavlāĕt soboj tak nazyvaĕmyj «belyj karlık», plotnosț kotorogo takova, čto massa, ravnaă masse Solnca, zanımaĕt tam ob’ĕm, ravnyj ob’ĕmu Zemlı. Otnosıteļnaă zaderžka vremenı na êtoj zvezde dostıgaĕt odnoj desātıtysāčnoj, t.e. prıblızıteļno voșmı sekund v sutkı.

Puļsar, obnaružennyj vnutrı Krabovıdnoj tumannostı (1 po katalogu Mesșĕ, ılı 1952;) ı ăvlāŭśıjsā ostatkom vzryva sverxnovoj okolo devātısot let nazad, predstavlāĕt soboj sleduŭśuŭ stadıŭ ĕśe boļšego sžatıă zvezdnogo veśestva, a ımenno «nejtronnuŭ zvezdu», plotnosț massy kotoroj dostıgaĕt desātı mıllıonov tonn na kubıčeskıj santımetr. Po sovremennym predstavlenıăm ona ımeĕt formu počtı pravıļnoj sfery dıametrom porādka 20 km, čto sravnımo s razmeramı, naprımer, goroda Turına. Zaderžka vremenı na ĕe poverxnostı po sravnenıŭ s vnešnım prostranstvom dostıgaĕt 10, a vtoraă kosmıčeskaă skorosț (skorosț, kotoruŭ neobxodımo prevysıț dlā preodolenıă sıly prıtāženıă) dostıgaĕt 100000 kms.

Вернуться к началу
 Профиль  
Cпасибо сказано 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему      Страница 1 из 1 [ Сообщений: 2 ]

 Похожие темы   Автор   Ответы   Просмотры   Последнее сообщение 
Конвертер из doc в TeX

в форуме Microsoft Word

lexus666

17

5533

24 сен 2011, 21:32

Конвертер величин

в форуме Объявления участников Форума

TqTq

1

694

25 мар 2014, 17:05

Разработать простейший текстовый редактор

в форуме Информатика и Компьютерные науки

Salibekova

0

248

10 июн 2015, 14:02

составить таблицу, используя встроенную в текстовый редактор

в форуме Информатика и Компьютерные науки

katyuha19

1

462

01 май 2011, 11:41


Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  

Яндекс.Метрика

Copyright © 2010-2020 MathHelpPlanet.com. All rights reserved