begin
clrscr;
sum:=0;
writeln('read 1 number');
readln(misp1);
writeln(' choose (+) (-) (*) (\)');
readln(x);
writeln('read number 2');
readln(misp2);
if (x='+') then
sum:=misp1+misp2;
if (x='-') then
sum:=misp1-misp2;
if(x='\') then
sum:=misp1/misp2;
if(x='*') then
sum:=misp1*misp2;
clrscr;
writeln(misp1,x,misp2,'=',sum:2:2);
end.

כמובן ניתן את זה במיליון דריכים אחרות טובות יותר פחות טובות
וכו' וכו' וכו' זה דוגמא לאחת מהם אתה מוזמן לשפר לשנות ולעשות
איך שאתה רוצה מקווה שעזרתי
נ.ב
{עכשיו תראה יש הרבה אפשרויות אתה יכול לעשות ש1 יהיה פלוס 2 מינוס
אתה יכול לעשות שתם יבחרו תפעולה כל מיני תשחק אם זה איך שבא לך
אני סתם בוחר אחד מהם)
אם לא הבנת משהו לאדע מה..תשאל יעזרו לך פה וגם אני
אין בעיה.
בהצלחה.