רוטר - עזרה בפונקציה בפסקל(מאוד פשוט)

יומן פעילות	לוח שנה	מבזקי חדשות	תקנון	RSS	כותרות	כותרות לפי תגובה	ניקוי קוקיז	IP	להורדת אפליקציה
eBay	AliExpress	GearBest	Amazon	Booking	Kiwi	SkyScanner	Trip Advisor

"עזרה בפונקציה בפסקל(מאוד פשוט)"

גירסת הדפסה

קבוצות דיון פיתוח, תיכנות ובניית אתרים נושא #7745	מנהל סגן המנהל מפקח Winner צל"ש מומחה

אשכול מספר 7745

16:49 10.01.04

עזרה בפונקציה בפסקל(מאוד פשוט)

ערכתי לאחרונה בתאריך 10.01.04 בשעה 17:00 בברכה, MO

תראו..... זה רושם לי ERROR:duplicate identifier
הפונקציה אמורה לקחת את A וB ולחבר ביניהם.... מה הטעות פה?
זאת פעם ראשונה שאני בונה פונקציה..

program hibur;
uses crt;
var num1,num2:longint;
function hibur(a:integer; b:integer):integer;
var ziun:longint;
begin
ziun:=a+b;
end;
begin
clrscrr;
writeln('type num1');
readln(num1);
writeln('type num2');
readln(num2);
hibur(num1,num2);
writeln(ziun);
end.

שתף

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

האשכול	מחבר	תאריך כתיבה	מספר
יש כאן 2 דברים בעיתיים	E-do	10.01.04 17:13	1
אתה יכול בבקשה להדפיס את התיקון כי אני לא מצל	MO	10.01.04 17:37	2
בבקשה	E-do	10.01.04 18:42	3
תודה	MO	10.01.04 21:20	4

E-do
חבר מתאריך 29.10.03
2160 הודעות

17:13 10.01.04

1. יש כאן 2 דברים בעיתיים
בתגובה להודעה מספר 0

הראשון, אתה לא קורא לפונקציה נכון, אתה חייב להכניס את התוצאה שלה לתוך משתנה כל שהוא, למשל, היית מגדיר בvar משתנה בשם a מסוג integer והיית רושם:

a:=hibur(num1,num2);

דבר נוסף - אתה לא יכול לקרוא לziun בתוכנית הראשית מכיוון שזה משתנה פנימי של הפונקציה.
אתה צריך להוסיף בתוך הפונקציה שורה כזאת:

hibur:=ziun;

-----------------
בברכה,
e-do

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

17:37 10.01.04

2. אתה יכול בבקשה להדפיס את התיקון כי אני לא מצל
בתגובה להודעה מספר 1

אני עדיין לא מצליח לעשות את זה.... :(

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

E-do
חבר מתאריך 29.10.03
2160 הודעות

18:42 10.01.04

3. בבקשה
בתגובה להודעה מספר 2

program hibur1;
uses crt;
var num1,num2:longint;
function hibur(a:integer; b:integer):integer;
var ziun:longint;
begin
ziun:=a+b;
hibur:=ziun;
end;
begin
clrscr;
writeln('type num1');
readln(num1);
writeln('type num2');
readln(num2);
writeln(hibur(num1,num2));
end.

שמתי לב גם לבעיה, שבגללה קיבלת את הודעת השגיאה - נתת לתוכנית ולפונקציה את אותו שם, ולכן קיבלת הודעת שגיאה.

-----------------
בברכה,
e-do

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

21:20 10.01.04

4. תודה
בתגובה להודעה מספר 3

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד