Pagalbos su paskaliu

Sveiki. Kas galit padet su paskaliniais uzdaviniais?

Tema ciklas cikle, tai reiketu orentuotis i tai, kad su ciklais padaryt..

1. Rasti funkcijos y=2x-3x^2 reiksmes intervale [m,n] su zingsniu h. (Zingsnis h gali buti bet koks).

2. Parasykite programa, kuri nustatytu, ar galima duotaji naturaluji skaiciu isreiksti dvieju naturaliuju skaiciu kvadratu suma. Jei galima, tai reikia spausdinti duotaji skaiciu, pranesima bei tuos du skaicius, priesingu atveju - duotaji skaiciu ir neigiama pranesima. Jei galimi keli sprendimo variantai, tai reikia rasti ir spausdinti visus.

3. Ciklisku skaitmenu perstatymu vadinamas toks perstatymas, kai kiekviena karta paskutinis skaiciaus skaitmuo perkeliamas i prieki, nepakeiciant kitu skaitmenu isdestymo tvarkos. Parasykite programa, kuri isspausdintu visu skaicius, gautus cikliskai pastacius duoto naturaliojo skaiciaus skaitmenis. Pvz., jei duota 259, tai reikia spausdinti: 259 925 592.

4. Yra tokia hipoteze: kiekvienas skaicius, gaunamas cikliskai perstatant trizenklio skaiciaus, dalaus is 37, skaitmenis, taip pat dalijasi is 37. (Cikliskas perstatymas kaip 3 uzd.) Visi skaiciai dalijasi is 37. Parasykite funkcija, patikrinancia, ar visiems trizenkliams skaiciams, kurie dalijasi is 37 tinka si hipoteze.

Kas ka galit padekit. Aciu!

Niekas už tave užduočių nedarys, teks pačiam googlintis įvedus pvz.: "pascal loops examples" rasi krūvą pavyzdžių. O čia pirmos užduoties sprendimas, kad užvest ant kelio:

Program HelloWorld(output);
var
  m: integer;
  n: integer;
  y: integer;
  a: integer;
begin
  m := 5;
  n := 10;
  for a := m to n do

  begin
     y := (2*a)-(3*(a*a));
     writeln(y);
  end;
end.