ЭКЗАМЕН

[Александр ЕЛуНИН]

ПОМОГИТЕ РЕШИТЬ ЗАДАЧКИ НА ЭКЗАМЕН
1)ДАНО 4 ЗНАЧНОЕ ЧИСЛО Х=ABCD.ПОЛУЧИТЬ ЧИСЛО В ОБРАТНОМ ПОРЯДКЕ Y=DCBA
2)ПО НОМЕРУ КВАРТИРЫ ОПРЕДЕЛИТЬ НОМЕР ПОДЪЕЗДА И ЭТАЖА.КВАРТИРА НАХОДИТСЯ В 5 ЭТАЖНОМ ДОМЕ, НА КАЖДОМ ЭТАЖЕ ПО 4 КВАРТИРЫ.

[KORN]

1) юзай функцию copy();
2) элементарная математика

[DM_bite]

1.

program Xd;
var N,a,b,c,d: integer;
    begin
    ReadLn(N);
    a:= N div 1000;
    b:= N div 100 mod 10;
    c:= N div 10 mod 10;
    d:= N mod 100 mod 10;
    WriteLn(d,c,b,a);
    ReadLn;
    end.

[Александр ЕЛуНИН]

СПАСИБО БОЛЬШОЕ ВОТ ЕЩЁ ЗАДАЧКИ
1)ПОМЕНЯТЬ МЕСТАМИ A И B, НЕ ИСПОЛЬЗУЯ ДОПОЛНИТЕЛЬНУЮ ПЕРЕМЕННУЮ
2)ДАНО 3-ЗНАЧНОЕ ЧИСЛО. НАЙТИ СУММУ КВАДРАТОВ ЕГО ЦИФР
3)ОПРЕДЕЛИТЬ ЯВЛЯЕТСЯ ЛИ ЧИСЛО ПОЛОЖИТЕЛЬНЫМ И КРАТНЫМ 3