This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
//JS | |
function preparePhrase(phrase) { | |
return phrase.toLocaleLowerCase() | |
.replace(/[^0-9а-яa-z]/gi, ""); | |
} | |
function isPalendrome(phrase) { | |
const preparedPhrase = preparePhrase(phrase); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public Class Form1 | |
Private Sub РАДИОЛОКАЦИОННЫЕ_СТАНЦИИBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles РАДИОЛОКАЦИОННЫЕ_СТАНЦИИBindingNavigatorSaveItem.Click | |
Me.Validate() | |
Me.РАДИОЛОКАЦИОННЫЕ_СТАНЦИИBindingSource.EndEdit() | |
Me.TableAdapterManager.UpdateAll(Me.Database6DataSet) | |
End Sub | |
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load | |
'TODO: данная строка кода позволяет загрузить данные в таблицу "Database6DataSet.РАДИОЛОКАЦИОННЫЕ_СТАНЦИИ". При необходимости она может быть перемещена или удалена. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public Class Form1 | |
Private Sub ПРЕДПРИЯТИЯBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles ПРЕДПРИЯТИЯBindingNavigatorSaveItem.Click | |
Me.Validate() | |
Me.ПРЕДПРИЯТИЯBindingSource.EndEdit() | |
Me.TableAdapterManager.UpdateAll(Me.Database4DataSet) | |
End Sub | |
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load | |
'TODO: данная строка кода позволяет загрузить данные в таблицу "Database4DataSet.ПРЕДПРИЯТИЯ". При необходимости она может быть перемещена или удалена. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public Class Form1 | |
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click | |
Dim array(12, 12), sum, count As Integer | |
sum = 0 | |
count = 0 | |
randArray(array, 12, 12) | |
output(array, ListBox1) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
var | |
value, i, j, pow :integer; | |
function func(a, b: integer): integer; | |
var index: integer; | |
begin | |
index := 0; | |
while (a mod b = 0) do | |
begin | |
a := a div b; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
var | |
value, i, pow :integer; | |
function func(a, b: integer): integer; | |
var index: integer; | |
begin | |
index := 0; | |
while (a mod b = 0) do | |
begin |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
//fpc 3.0.0 | |
program HelloWorld; | |
var | |
value, i, pow :integer; | |
function func(a, b: integer): integer; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public Class Form1 | |
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click | |
Dim array(12, 12), sum, count As Integer | |
sum = 0 | |
count = 0 | |
randArray(array, 12, 12) | |
output(array, ListBox1) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
PS C:\studio\b4w_server\client> bower install | |
bower fp-look#* not-cached ssh://git@devops.triumph.msk.ru:9022/triumph/b4w-look.git#* | |
bower fp-look#* resolve ssh://git@devops.triumph.msk.ru:9022/triumph/b4w-look.git#* | |
bower w-store#* not-cached ssh://git@devops.triumph.msk.ru:9022/bower_components/w-store.git#* | |
bower w-store#* resolve ssh://git@devops.triumph.msk.ru:9022/bower_components/w-store.git#* | |
bower fp-video-player#* not-cached ssh://git@devops.triumph.msk.ru:9022/tula.cloth/bower_components/fp-video-player.git#* | |
bower fp-video-player#* resolve ssh://git@devops.triumph.msk.ru:9022/tula.cloth/bower_components/fp-video-player.git#* | |
bower fp-tree#* not-cached ssh://git@devops.triumph.msk.ru:9022/tula.cloth/bower_components/fp-tree.git#* | |
bower fp-tree#* resolve ssh://git@devops.triumph.msk.ru:9022/tula.cloth/bower_components/fp-tree.git#* | |
bower fp-forms#* not-cached ssh://git@devops.triumph.msk.ru:9022/tu |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Option Strict On | |
Imports System.Math | |
Public Class Form1 | |
Function vvod(ByVal t As TextBox) As Double | |
Return Val(t.Text) | |
End Function | |
Sub vivodlist(ByVal t As String, ByVal lb As ListBox) | |
lb.Items.Add(t) | |
End Sub | |
Public Function fun1(ByVal x As Double, ByVal y As Double) As Double |
NewerOlder