Padėkite su pascal plz

Parašykite programą apskaičiuoti sumai: 1 + 11 + 111 +...+ 111...1. Pradinis duomuo - paskutinio dėmens skaitmenų skaičius.

Būsiu labai dėkingas :) pascal ar c++ nesvarbu manau

program suma;

var y,z,x,i : longint;

begin

Readln(x);

z := 1;

for i:= 1 to x do

begin

y := y*10+1;

z := z + y;

end;

Writeln(z);

end.

Radau šitą, bet čia manau apskaičiuoja tik sumą,o kaip dėl Pradinis duomuo - paskutinio dėmens skaitmenų skaičius. ?

Kur dar moko pascal? Ar neturejo visos mokyklos pereiti prie C++ pagal mokymo programa?

Kur dar moko pascal? Ar neturejo visos mokyklos pereiti prie C++ pagal mokymo programa?

pascal ar c++ nera skirtumo manau,tapati rasyti reikia, tai gal moki ispresti sita?

Kur dar moko pascal? Ar neturejo visos mokyklos pereiti prie C++ pagal mokymo programa?

Vu informatikoj pirmą semestrą dar pascal moko... :D

Niekas nepadės? :(

Susikuria accounta, kad padeti namu darbus daryti.. niekas taip nedaro :(

Tai viskas čia padaryta. Tas pradinis duomuo yra tas x kurį nusiskaitai, "paskutinio dėmens skaitmenų skaičius" pasako kiek kartu sumuoti reikia.

Tai viskas čia padaryta. Tas pradinis duomuo yra tas x kurį nusiskaitai, "paskutinio dėmens skaitmenų skaičius" pasako kiek kartu sumuoti reikia.

Parašyk vistiek pilnai jei negaila :)

Parašyk vistiek pilnai jei negaila :)

Nesuprantu ko nesupranti. Taigi visą kodą pats įdėjęs turi, daugiau nieko nereikia. Nesupranti ką reiškia "Pradinis duomuo"?

Tiesa pasakius, tai nėra ten viskas gerai. Eilutė y := y*10+1; neteisinga. Turėtų būti y = (10^y) +1. Tai čia taip matematiškai, o su paskaliu nedirbu tai kaip ten rašosi - nežinau.

Tiesa pasakius, tai nėra ten viskas gerai. Eilutė y := y*10+1; neteisinga. Turėtų būti y = (10^y) +1. Tai čia taip matematiškai, o su paskaliu nedirbu tai kaip ten rašosi - nežinau.

Nepasakok pasakų.

Nepasakok pasakų.

ai, sorry, mano klaida :)

man idomu kaip dar su pascal programuoji? nes ant w7 nerandu compiliariaus pascal, tai win xp naudoji?

man idomu kaip dar su pascal programuoji? nes ant w7 nerandu compiliariaus pascal, tai win xp naudoji?

Ant windows7 tas pats fps 0.6.4 veikdavo (angliška versija aišku, nes lietuviška ir ant xp lūžta).

O šiaip siūlau Lazarus naudot jei programuojat su PASCAL ant windows 7/8/10