Два по икт задали. 1. пользователь задает 3 целых числа в результате программы значения переменных меняются местами. 2. пользователь задает 2 целых числа, найти частное этих чисел. заранее )

1. var a,b,c,t: integer; beginwriteln('a, b, c: '); readln(a,b,c); t: =a; a: =b; b: =c; c: =t; writeln('a = ',a,' b = ',b,' c = ',c); end.пример: a, b, c: 5 8 3a = 8 b = 3 c = 52.var a,b: integer; beginwriteln('a, b: '); readln(a,b); writeln(a,' / ',b,' = ',a/b: 6: 3); end.пример: a, b: 5 85 / 8 = 0.625