Takmicenje u programiranju

Neki dan mi je nastavnica informatike ponudila da idem na takmicenje iz informatike i ja sam pristao.Danas mi je dala neke zadatke sa kantonalnih takmicenja iz informatike i pola mi toga nije jasno.Ima puno novih naredbi skojim se nisam susretao.Evo jednog zadatka sa kantonalnog takmicenja:

Odredite sve trocifrene brojeve kod kojih je zbir kubova jednak njima samim

RJESENJE:

CLS

FOR i = 100 TO 999

S = FIX(i / 100)

D = FIX((i – S * 100) / 10)

J = i – S * 100 – D * 10

IF i = S ^ 3 + D ^ 3 + J ^ 3 THEN PRINT i

NEXT i

END

Napisati program koji će iz učitanog niza od 7 prirodnih brojeva odrediti koliko ima različitih brojeva u nizu:

10 CLS

20 S = 0

30 DIM A(7)

40 FOR i = 1 TO 7

50 PRINT „UNESITE CLAN NIZA A (“ ; i ; “) = “; ; INPUT A(i)

60 NEXT i

70 FOR i = 1 TO 7

80 FOR j = i + 1 TO 7

90 IF A(i) = A(j) THEN GOTO 120

100 NEXT j

110 S = S + 1

Mozes li mi i ovo pojasniti.Sta je ovo DIM A

Nisam ja kriv takva nastavnica,ja sve sto sam naucio naucio preko interneta,i onda se sjeti jedan dan da me posalje na takmicenje :D

Pa znam ja one osnovne naredbe : REM PRINT INPUT GOTO IF IF THEN IF THEN ELSE CLS END

A nije gospođi palo na pamet da se malo pomuči oko natjecanja, misli ona očito da rezultati i priznanja padaju sa kruške.

Ne volim se petljati u tuđe stvari, ali ova filozofija "lako ćemo" mi se više popela na vrh glave. Inače da dečko osvoji kakvu

nagradu, znala bi se gospođa utrpati u prvi red, to sigurno.

ko ide na takmicenje iz programiranja, a da je u osnovnoj skoli?

kako ne pita dali ide neko na natjecanje iz programiranja za osnovnu skolu