Укажите все верные утверждения.

1)в зависимости от расширения операционная система для файлов показывает различные значки, а при двойном щелчке запускает, связанную с этим расширением программу.
2)обычно имя файла состоит из двух частей, разделённых точкой: собственного имени файла и расширения имени.
3)если изменить расширение файла, то данные в нём тоже изменятся и его можно будет открывать в другой программе.
4)имя файла − это набор символов (букв, цифр и однозначно определяющий файл в каталоге (папке).
5)расширение имени файла, как правило, указывает место хранения файла на диске.
6)расширение имени файла, как правило, характеризует тип данных, содержащихся в файле

program xxx;

var s : string;

        а : integer;

begin

    writeln ('введите слово-');

    readln (s);

    а: = length(s)

    writeln ('длина слова=', a);

    readln

end.

pust' x chaek na pervom ostrove,a y na vtorom.

togda iz uslovia mozhno sostavit' sistemu:

x+y=79;

x-15-12=y+12;

togda y=x-39;

x+(x-39)=79;

x=59;

y=59-39=20.

otvet: 59 chaek na pervom ostrove, 20 na vtorom.

program ml; uses crt; var x,i: integer;       w,l: real; beginclrscr; readln(x); l: =x; for i: =1 to x do                                                beginw: =w+1; l: =x/w; if frac(l) = 0 then writeln(l: 2: 0);                                                                                               end; readkey; end.

совершенное число это число равное сумме своих делителей отличных от самого числа

var i, s,j : integer;

begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.