Решить в паскале
1) C начала суток прошло N секунд. Необходимо определить сколько полных минут прошло с начала суток.
2) C клавиатуры вводится двузначное число. Необходимо его "развернуть", т.е. поменять местами десятки и единицы, и сложить с исходным числом. Например, если ввести число 25, то должна быть получена сумма 25 и 52 (25+52=77).
3) Стоимость товара n рублей m копеек. За него заплатили t рублей s копеек. Нужно определить какая сдача будет получена. С клавиатуры вводится 4 числа: n и m, t и s. Количество копеек должно быть меньше 100. В ответе на мониторе должны быть получены два числа: сдача в рублях и копейках. Например, если товар стоит 5 руб. 85 копеек, а за него заплатили 8 руб. 10 копеек, то сдача будет 2 руб. 25 копеек.
4) С клавиатуры вводится целое число. Необходимо вывести следующее за ним четное число. Например, если ввести 7, то в ответе получим 8, если ввести 12, то в ответе должны получить 14. (нельзя использовать ветвления и циклы)

1)var n:longint;begin readln(n); writeln(n div 60));end.2)var n,m,i,j:longint;begin  readln(n); m:=n mod 10 *10 + n div 10; writeln(n,'+',m,'=',n+m);end.3)var a,b,c,d:longint;begin readln(a,b,c,d); dec(c,a); dec(d,b); if d<0 then begin  dec(c);  d:=100 -abs(d); end; writeln(C,' рублей ',d,' копеек');end.4)var a:longint;begin readln(a); if odd(a) then inc(a) else inc(a,2); writeln(a);end.Если что то не работает напиши .