Помош: Кратки програмки

  • Креатор на темата Креатор на темата back_rest
  • Време на започнување Време на започнување
vakva e zadacata:

Код: 
Module Module1
 
    Sub Main()
 
        Dim i, j, n As Single
 
        n = 3
        Dim T(,) As Double
 
        Dim M(n - 1, n - 1) As Double
        For i = 0 To n - 1
            For j = 0 To n - 1
 
                M(i, j) = Console.ReadLine()
 
 
            Next
        Next
        'Console.WriteLine(M.Rows.Count)
        Console.WriteLine(TypeName(M))
        T = Cholesky2(M)
          Console.Write(T)
        Console.WriteLine(TypeName(T))
 
        Console.ReadLine()
 
    End Sub
 
    Function Cholesky2(ByVal mat)
        Dim A As Object, L(,) As Double, S As Double
        Dim n As Integer, m As Integer, j As Integer, k As Integer, i As Integer
        A = mat
       
            n = UBound(mat)
            m = UBound(mat, 2)
 
        If n <> m Then
            Cholesky2 = "?"
            Exit Function
        End If
 
        ReDim L(n, n)
        For j = 1 To n
            S = 0
            For k = 1 To j - 1
                S = S + L(j, k) ^ 2
            Next k
            L(j, j) = A(j, j) - S
            If L(j, j) <= 0 Then Exit For
            L(j, j) = Math.Sqrt(L(j, j))
 
            For i = j + 1 To n
                S = 0
                For k = 1 To j - 1
                    S = S + L(i, k) * L(j, k)
                Next k
                L(i, j) = (A(i, j) - S) / L(j, j)
                Console.Write(S)
 
            Next i
            ' Console.WriteLine(S)
        Next j
        Cholesky2 = L
 
    End Function
End Module

algoritmot e pa takov
http://en.wikipedia.org/wiki/Cholesky_decomposition

Sekoja pomos e dobredojdena
Prv pat programiram vo VB , pa imam malku problemi so sintaksava
 
Ако може да го прегледа некој кодот од задачата , делот со датотеката неработи. Значи кодот се компајлира, останатиот дел од кодот работи, само не се запишуваат внесените податоци во фајлот CD-Teka.txt т.с не се создава фајлот CD-Teka.txt.
 

Attachments

mi treba pomos okolu edna zadaca
napisav funkcija vo VB , ama sega trebalo da koristam Windows Form Application.
Znaci imam da vnesam preku 9 polinja vrednosti na matrica , do sega so Console.ReadLine() gi citav sega treba so TextBox, i koga ke gi vnesam tie da kliknam na kopce da mi ja vikne funkcijata i da mi napravi transformacija na tabelata sto e 3x3

fala odnapred
--- надополнето: 15 мај 2012 во 21:28 ---
mi treba pomos okolu edna zadaca
napisav funkcija vo VB , ama sega trebalo da koristam Windows Form Application.
Znaci imam da vnesam preku 9 polinja vrednosti na matrica , do sega so Console.ReadLine() gi citav sega treba so TextBox, i koga ke gi vnesam tie da kliknam na kopce da mi ja vikne funkcijata i da mi napravi transformacija na tabelata sto e 3x3

fala odnapred
 
fox88 напиша:
mi treba pomos okolu edna zadaca
napisav funkcija vo VB , ama sega trebalo da koristam Windows Form Application.
Znaci imam da vnesam preku 9 polinja vrednosti na matrica , do sega so Console.ReadLine() gi citav sega treba so TextBox, i koga ke gi vnesam tie da kliknam na kopce da mi ja vikne funkcijata i da mi napravi transformacija na tabelata sto e 3x3

fala odnapred
--- надополнето: 15 мај 2012 во 21:28 ---
mi treba pomos okolu edna zadaca
napisav funkcija vo VB , ama sega trebalo da koristam Windows Form Application.
Znaci imam da vnesam preku 9 polinja vrednosti na matrica , do sega so Console.ReadLine() gi citav sega treba so TextBox, i koga ke gi vnesam tie da kliknam na kopce da mi ja vikne funkcijata i da mi napravi transformacija na tabelata sto e 3x3

fala odnapred
Кликни за повеќе...

Ок, и што е проблемот? Направи форма со 9 текстуални полиња и едно копче за повикување на функцијата кое ќе направи и проверка на внесените вредности и толку е. Што те мачи?
 
Кои бројки треба да ги искуцам за cookisot да трае да речеме една година?
function createCookie(name,value,exp) {
if (exp) {
var date = new Date();
date.setTime(date.getTime()+(24*60*60*1000));
var expires = "; expires="+date.toGMTString();
}
else var expires = "";
document.cookie = name+"="+value+expires+"; path=/";
}

function readCookie(name) {
var nameEQ = name + "=";
var ca = document.cookie.split(';');
for(var i=0;i < ca.length;i++) {
var c = ca;
while (c.charAt(0)==' ') c = c.substring(1,c.length);
if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
}
return null;
 
Имаш повеќе опции.
24*60*(бројот на денови во годината)*365= (збирот)
24*60*(просечно бројот на денови во месецот)*12*365= (збирот)
24*60*(бројот на денови во годината)*364= (збирот)
24*60*(просечно бројот на денови во месецот)*12*364= (збирот)
Поедноставно здравје :)
 
Darko_ufo напиша:
Кои бројки треба да ги искуцам за cookisot да трае да речеме една година?
...

date.setTime(date.getTime()+(24*60*60*1000));

...
Кликни за повеќе...

Се` што треба да направиш е да ги помножиш тие бројките во издвоената линија по 365 (365*24*60*60*1000). Читано од десно: 1000 милисекунди во секунда * 60 секунди во минута * 60 минути во час * 24 часа во ден * 365 дена во година.
 
Да се напише програма која за одговарачкиот внесен N формира и печати квадратна матрица од следниот облик, на пр. за N = 4:

1 2 3 4
12 13 14 5
11 16 15 6
10 9 8 7
 
Ај дај пример ако N=6...
Некако на гледам некоја логика во вториот и третиот ред од матрицата :icon_lol:
 
Despod напиша:
За N = 6:
Кликни за повеќе...
Ова ти е спирала.
Имаш еден голем фор и во него 4 други -- еден за од лево на десно, еден за од горе на долу, еден за од десно на лево и последниот за од долу кон горе. Користиш и неколку променливи, лева граница, десна граница, долна граница и горна граница кои ќе се користат во форовиве. И тоа е. Код не ми се пишува :).
 
PHP: 
#include"stdio.h"
 
void main(){
 
    int a[11][11],n=3,i,j,h,c=1;
 
    printf("Enter matrix size");
    scanf("%d",&n);
 
for(h=0;h<n/2;h++) {
    for(i=h;i<n-h;i++)
        {
            a[h][i]=c;
            c++;
        }
 
    for(i=h+1;i<n-h;i++){
        a[i][n-h-1]=c;
        c++;
    }
 
    for(i=n-h-1-1;i>=h;i--){
        a[n-h-1][i]=c;
        c++;
    }
 
    for(i=n-h-1-1;i>h;i--){
        a[i][h]=c;
        c++;
    }
 
}
 
    if(n%2!=0){
        a[(n/2)][(n/2)]=c;
        c++;
    }
 
    for(i=0;i<n;i++) {
        printf("\n\n");
        for(j=0;j<n;j++)
            printf(" %3d ",a[i][j]);
 
    }
 
return 0;
 
}
извор.
 
import java.util.Scanner;


public class oki {
public static void main(String[] args){

System.out.println("PAREN / NEPAREN");
System.out.println("Vnesete nekoj broj : ");
int a;

Scanner c = new Scanner(System.in);
a = c.nextInt();

if(a/2){
System.out.println("PAREN");
}
else{
System.out.println("Neparen");
}

}

}
ЗНАЧИ ТУКА КАЈ ИФ стејтмент незнам како да направам за да ми кажува во конзолата дали е парен или непарен број ... што треба да ставам во условот???
 
You must log in or register to reply here.

Kajgana Shop

Back
На врв Bottom