FPS 0.6.4a

1.Sudarykite programą dviejų sveikųjų skaičių sandaugai rasti. Programoje sandaugos operacijos negali būti.

2.Mokinys ant popieriaus lapo surašė visus teigiamus dviženklius skaičius. Berašydamas sumanė suskaičiuoti kiek sunaudojo dvejetų skaičiams parašyti. Sudarykite programą dvejetams suskaičiuoti.

 

3.Duotas natūralusis skaičius N. Raskite naują skaičių, sudarytą iš duotojo skaičiaus skaitmenų kvadratų. Pvz.: N=123, tai atsakymas 149.

Kas galit padėkit. :)

Ir kas nesigauna?

Redagavo Gegužės 19, 2014 kashiukas

Nu man reikia ,kad padarytu.

Nu man reikia ,kad padarytu.

Apmokėsi?

1 tai gali for cikla sukti ir vis prideti po tam tikra skaiciu :D pvz,jei tau reikia sudauginti 3 ir 2,tai suki for cikla ir kiekviena karta pridedi po 3 arba po 2,priklausomai nuo to,kiek ta cikla suksi :)

 

3 tai skaidai duota skaiciu po skaitmeni,keli kvadratu ir vel sudedi. Kai ant c++ tai paprasciau ten viska butu galima,su fps,man rodos nera ten daug tu funkciju. Pati jau primirsus ji truputi :/

 

2 irgi realiai tas pats. Gali skaidyti po pirma ir antra skaitmeni ir ziureti,ar jis lygus 2,jei taip,tai sumuoji ju kieki ir taip darai kol pasieki visu skaiciu pabaiga :) Na,nezinau,cia mano tokie greiti pamastymai. Gal pades ;)

1 tai gali for cikla sukti ir vis prideti po tam tikra skaiciu :D pvz,jei tau reikia sudauginti 3 ir 2,tai suki for cikla ir kiekviena karta pridedi po 3 arba po 2,priklausomai nuo to,kiek ta cikla suksi :)

 

3 tai skaidai duota skaiciu po skaitmeni,keli kvadratu ir vel sudedi. Kai ant c++ tai paprasciau ten viska butu galima,su fps,man rodos nera ten daug tu funkciju. Pati jau primirsus ji truputi :/

 

2 irgi realiai tas pats. Gali skaidyti po pirma ir antra skaitmeni ir ziureti,ar jis lygus 2,jei taip,tai sumuoji ju kieki ir taip darai kol pasieki visu skaiciu pabaiga :) Na,nezinau,cia mano tokie greiti pamastymai. Gal pades ;)

Aš ir taip pat galvojau ,tik nzn kaip parasyti kad tarkim 7*4 ir ,kad būtų 7+7+7+7 any ideas?

Na,jeigu neklystu,tai turetu but kazkas tokio:

 

int sum=0;

for int i:=1 to 4 do

sum=sum+7;

 

Kazkas panasaus. Nesu tikra tik del sintakses :/

Redagavo Gegužės 19, 2014 eglele

Dar viena užduotis

Keliamieji metai turi 366 dienas, paprastieji – 365. Visi metai, išskyrus šimtmečius, yra keliamieji, jie dalūs iš 4. Šimtmečių metai yra keliamieji, jeigu dalūs 400. Pvz.: 1600 metai yra keliamieji, nes dalūs iš 400, o 1700 – paprastieji. Raskite visus mūsų eros keliamuosius

 

Programos pradžia

program Bevardë1;

var b,a,r,k,s:integer;

begin

a:=2014 div 4 ;

writeln(a);

readln;

end.

 

noriu atskirti skaitmenis tik neatsimenu kaip paršyti galit padėt? :D

Tarkime,jei skaicius susideda is 4, pvz 1234. Tai kad gautum pirma skaitmeni( 1), tai 1234 div 1000; kad gautum antra, tai 1234 div 100 mod 10; kad gautum 3: 1234 mod 100 div 10 ir kad gautum ketvirta tai 1234 mod 1000 :)Lyg ir nepriveliau klaidu. Tiesiog logiskai cia ismastyt, o ne atsiminti reikia ;)