ПОЖАЛУЙСТА ОЧЕНЬ СРОЧНО!!!!!!!!!!!
ЭТО ЗАДАЧИ ИЗ PASKAL ABC
1. Дано число K. Напишите программу, которая находит и выводит на экран количество полных минут и оставшихся секунд.
2. В школу подано N заявок в 1 класс. В каждом классе может быть не более 26 учеников . Сколько классов может быть сформировано в школе? Сколько детей будет переведено в другие школы?
3. Дано расстояние L в сантиметрах. Используя операцию деления нацело, найти количество полных метров в нем (1 метр=100 см)
4. Дано двузначное число. Найти:
a. Число единиц в нем; b. Сумму его цифр;
5. Дано трехзначное число:
а. Число десятков в нем; b. произведение его цифр.
6. Дано четырехзначное число. Найти сумму его цифр;
ПОЖАЛУЙСТА ОЧЕНЬ СРОЧНО!!!!!!!!!!!

1)var K, d:real;

begin

read(K);

d:=Kdiv+Kmod;

write(d);

end.

2) var  N, f:real;

begin

read(N);

f:=N-d;

write(d);

end.

3)var L,d:real;

begin

read(L);

d:=Ldiv;

write(d);

end.

4)var c,d,b,a:real

begin

read(c, d);

a:=c-d;

write(a);

b:=c+d;

write(b);

end.

6)var a,b,c,d,e:real:

begin

read(a, b, c, d);

e:=a+b+c+d;

write(e);

end.

5)var a,b,c,d,e:real;

begin

read(c,d,e);

a:=c+d+e;

write(a);

b:=c*d*e;

write(b);

end.