MarmaladeKnight

n = int(input())
m = int(input())
wires = []

for i in range(m):
    wire = list(map(int, input().split()))
    wires.append(wire)
    
broken_count = int(input())
broken_wires = list(map(int, input().split(' ')))

MarmaladeKnight

Option Explicit On
Option Strict On
Imports System.Math

Public Class Form1
    Function vvod(ByVal Input As TextBox) As Double
        Return CDbl(Input.Text)
    End Function

    'Function countValue(ByVal a As Double, ByVal b As Double, ByVal c As Double, ByVal x As Double) As Double

MarmaladeKnight

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

MarmaladeKnight

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

MarmaladeKnight

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)

MarmaladeKnight

 
//fpc 3.0.0 

program HelloWorld; 


var 
value, i, pow :integer; 

function func(a, b: integer): integer; 

MarmaladeKnight

var 
value, i, pow :integer; 

function func(a, b: integer): integer; 
    var index: integer; 
begin 
    index := 0; 
    while (a mod b = 0) do 
    begin 

MarmaladeKnight

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; 

MarmaladeKnight

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)

MarmaladeKnight

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.ПРЕДПРИЯТИЯ". При необходимости она может быть перемещена или удалена.