Paskalis

Sveiki, programišiai. Reikia pagalbos su freepascal'iu. Taigi prie reikalo - reikia parašyti programa šiem uždaviniam:

1.Duotas realusis skaičius x. Parašykite programą, kuri rastų y reikšmę, iš formulės 2x+7y=9. Rezultatą atspausdinkite 0,01 tikslumu.

2.Duoti stačiojo trikampio statinių ilgiai (realieji skaičiai). Parašykite programą, stačiojo trikampio plotui ir perimetrui rasti. Rezultatą atspausdinkite 0,0001 tikslumu.

Moralų nereikia, ypač tokių kaip, kad: eik mokytis, logiškai galvok ir panašiai.

Sveiki, programišiai. Reikia pagalbos su freepascal'iu. Taigi prie reikalo - reikia parašyti programa šiem uždaviniam:

1.Duotas realusis skaičius x. Parašykite programą, kuri rastų y reikšmę, iš formulės 2x+7y=9. Rezultatą atspausdinkite 0,01 tikslumu.

 

2.Duoti stačiojo trikampio statinių ilgiai (realieji skaičiai). Parašykite programą, stačiojo trikampio plotui ir perimetrui rasti. Rezultatą atspausdinkite 0,0001 tikslumu.

 

Moralų nereikia, ypač tokių kaip, kad: eik mokytis, logiškai galvok ir panašiai.

Kiek pats padarei? 

Galiu pasiūlyt tik eit mokytis, logiškai galvot ir t.t..

Kiek pats padarei? 

4 užduotis iš 6. Šitos dvi sunkios..

Taigi čia tokie vaikiški uždaviniai... Per 10 min abu gali padaryt.

1. 7y = 9 - 2x

    y = (9 - 2x) / 7

2. Įžambinė (c²) = a² + b²

S = 1/2 a * b

Taigi čia tokie vaikiški uždaviniai... Per 10 min abu gali padaryt.

Tai padaryk, ko aš ir prašau.

4 užduotis iš 6. Šitos dvi sunkios..

Duok sąlygas kurias padarei. Netikiu, kad lengviau.

Duok sąlygas kurias padarei. Netikiu, kad lengviau.

1. Duotas natūralusis keturženklis skaičius. Parašykite programą, kuri rastų šio skaičiaus skaitmenų sumos ir skirtumo sandaugą.

2. Duotas natūralusis šešiaženklis skaičius a. Parašykite programą, kuri rastų skaičių b, kuris gaunamas perrašant skaičiaus a skaitmenis atvirkščia tvarka. Apskaičiuokite a ir b skirtumą.

3. Parašykite programą duoto natūraliojo skaičiaus priešpaskutiniam skaitmeniui pakeisti duotu skaitmeniu.

4. Duotas natūralusis skaičius. Parašykite programą, kurios rezultatas yra skaičius, gautas sukeitus vietomis pradinio duomens priešpaskutinį skaitmenį su trečiu nuo galo.

Taigi čia tokie vaikiški uždaviniai... Per 10 min abu gali padaryt.

 

1. 7y = 9 - 2x

    y = (9 - 2x) / 7

 

2. Įžambinė (c²) = a² + b²

 

S = 1/2 a * b

Čia grynai reikia programą parašyt

su tuo

program;

var;

begin ir t.t.

gera tema, kai pradesiu as spresti uzdavinius, jauciu ir kreipsiuos

Tai padaryk, ko aš ir prašau.

Neprogramuoju su Paskal, tai negaliu parašyt. Reiktų rašytis Paskalį, o tikrai tingiu.

Pirma:

program Programa;
var x : integer;
    y : real;
begin
    Readln(x);
    y := (9 - 2*x)/7;
    Writeln(y:4:2);
    Readln();
end.

Čia x'ą nuskaito klaviatūra, t.y pats įrašai x'ą. Gali tiesiog priskirt kokiai nors reikšmei.

Pirma:

program Programa;
var x : integer;
    y : real;
begin
    Readln(x);
    y := (9 - 2*x)/7;
    Writeln(y:4:2);
    Readln();
end.

Čia x'ą nuskaito klaviatūra, t.y pats įrašai x'ą. Gali tiesiog priskirt kokiai nors reikšmei.

"Duotas realusis skaičius x". Man rods pas tave jis sveikasis

"Duotas realusis skaičius x". Man rods pas tave jis sveikasis

Tada x irgi real padaryk.

Nebeatsimenu sintakses paskalio :/

Pirma:

program Programa;
var x : integer;
    y : real;
begin
    Readln(x);
    y := (9 - 2*x)/7;
    Writeln(y:4:2);
    Readln();
end.

Čia x'ą nuskaito klaviatūra, t.y pats įrašai x'ą. Gali tiesiog priskirt kokiai nors reikšmei.

Dėkingas