Прошу, составьте 3 любых задачки

Program 1var a, b, c: integer; begin; write ('введите a и b'); read (a и b); if c: =a+b; write (c); readkey (c); end. Приблизительно такеще две так же только замени + на — или + на*