Для выделения в четырехзначном числе X цифры из разряда единиц следует воспользоваться командой... n:=X-1;
n:=X mod 10;
нет верного ответа
n:=X div 1000;
все ответы верны

В программе переменная Х описана как integer. Какую из операций НЕЛЬЗЯ применить к Х?
n:=X div 10;
n:=X/10;
x:=x+5;
n:=X mod 10;

program bapehbe;

var

    l, b, s : integer;

    o : real;

begin

    writeln (' skolko litrov varenya v tazy? ');

    readln (l);

    writeln (' kakaya emkost banok? ');

    readln (b);

    s: = l div b;

    o: = l mod b;

    writeln (' polnih banok_', s);

    writeln (' litrov ostaloc_', o: 2: 2);

    readln;

end. 

первая программа считает сумму входящих в строку цифр стоящих на местах с нечетными номерами, начиная с первой, если это буква то вместо нее берется 0(ноль)

результат выполнения

аб2в457где245*ж0247025020

2) 

var s, r: string; i: integer;

begin readln(s); r : = ''; for i : = 1 to length(s) do if s[i] < > 'c' then r : = r + s[i]; writeln(r); end.

поскольку http: \\ftp. не бывает, то ftp: \\schools.ru\program.exe

февраль зимний месяц

май весенний месяц

август летний месяц 

сентябрь осенний месяц