ПОМОЩ ЗА ТУРБО ПАСКАЛ

[Spectre™]

Хора помагайте, че съм го загазил... Имам два изпита в един ден.. Единия е по Турбо Паскал, а другия е по Математика 1.... Въпроса е, че за изпита по Паскал трябва освен писмения изпит който държиш да представиш и курсова работа... А аз няма да мога да се справя, а и следната задача ми е доста трудна..
Надявам се да не ми се смеете.. Ако някой може да ми помогне ще съм му много благодарен...

Ето я и задачата:

Дадени са два едномерни масива А[20] и B[20] с цели числа. Да се изчислят стойностите на елементите на едномерните масиви C[20] и
D[20] като сума и произведение от стойностите на съответните елементи от масивите A и B.

[°niksi°]

Надявам се с декларирането на масивите да нямаш проблем, че съм го забравил с Паскала как беше, ако не се лъжа:

var A, B, C, D:array=[1..20] of INTEGER;

Код: Избери всички

for i= 1 to 20 do
   begin
   C[i]:=A[i]+B[i]; {тука се изчислява сумата}
   D[i]:=A[i]*B[i]   {тука се изчислява произведението}
   end;


Най-ми е чудно каква курсова работа за 2 реда код

[Spectre™]

Ами това изтеглих като листче от купа... Това ми е първата курсова по ПИК, но жената каза, че била горе долу средна трудност.. И трябвало да я съберем в 1 до 2 листа.. Аз посмъртно не знам как ще напиша и от къде ще измъдря толкова.. Ама ужас направо.

Надявам се с декларирането на масивите да нямаш проблем

Там е проблема, че и аз съм забравил всичко... А едно време го чатках..

[buFka]

деклариране на масиви става по следния начин:

T0 = array[1..5] of integer;

или

T0 = arrray[-3..10] of real;

Все ми се струва, че var не му е мястото там....променлива и масив са 2 различни неща

[buFka]

опс.....грешката е моя, все пак си му е мястото там

[°niksi°]

Само една поправка с декларацията:
var A, B, C, D:array[1..20] of INTEGER;
i : integer

var A, B, C, D:array=[1..20] of INTEGER;

Код: Избери всички

for i= 1 to 20 do
   begin
   C[i]:=A[i]+B[i]; {тука се изчислява сумата}
   D[i]:=A[i]*B[i]   {тука се изчислява произведението}
   end;


[mimo4o]

За да стане повечко код напиши и за всеки нов елемент да се подканва потребителя да въведе стойност

[Spectre™]

Благодаря на всички които писаха до тук, ако някой друг се сети за нещо нека го напише тук..
Благодаря ви... bowdown bowdown

[VW_FEN]

Батка, виж какво става тука!!!
http://en.wikipedia.org/wiki/Turbo_Pascal
www.wikipedia.org е истината!!! bowdown
Колкото за две-три страници, има точно

[Spectre™]

Батка, виж какво става тука!!!
http://en.wikipedia.org/wiki/Turbo_Pascal
www.wikipedia.org е истината!!! bowdown
Колкото за две-три страници, има точно

Благодаря за линковете, също така и на всички останали...., които ми помогнаха..

Курсовата работа беше унищожена и разнищена за два дена.... А сега само късмет ми трябва за изпита....