1.Найти произведение цифр четырехзначного числа. 2.Найти сумму второй, третьей и четвертой цифр пятизначного числа.
2.Получить обратную запись трехзначного числа (например, из 452 получить 254).
3.Поменять местами вторую и четвертую цифры четырехзначного числа.
4.Дано трехзначное число. В нем зачеркнули первую слева цифру и приписали ее справа. Вывести полученное число.​

картины нету где на найти? ак п

Объяснение:

ал ьададаадп адж до ааа бш

var

n: integer;

begin

readln(n);

case n mod 12 of

4: writeln('год крысы');

5: writeln('год коровы');

6: writeln('год тигра');

7: writeln('год зайца');

8: writeln('год дракона');

9: writeln('год змеи');

10: writeln('год лошади');

11: writeln('год овцы');

0: writeln('год обезьяны');

1: writeln('год петуха');

2: writeln('год собаки');

3: writeln('год свиньи');

end;

end.

var a: integer;

begin

writeln ('vvedite nomer mesuaca');

read (a);

if (a=1) then writeln ('30');

if (a=2) then writeln ('28');

if (a=3) then writeln ('30');  

  if (a=4) then writeln ('31');  

  if (a=5) then writeln ('30');  

  if (a=6) then writeln ('31');  

  if (a=7) then writeln ('30');  

  if (a=8) then writeln ('31');  

  if (a=9) then writeln ('30');  

  if (a=10) then writeln ('31');  

  if (a=11) then writeln ('30');  

  if (a=12) then writeln ('31');  

end.