var x: integer;
begin
write('Введите номер дня недели: ');
readln(x);
if (x = 1)then writeln('Понедельник');
if (x = 2)then writeln('ВТорник');
if (x = 3)then writeln('Среда');
if (x = 4)then writeln('Четверг');
if (x = 5)then writeln('Пятница');
if (x = 6)then writeln('Субота');
if (x = 7)then writeln('Воскресенье');
end.
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrGen(ReadInteger('n='), i -> (i + 1) * 6);
a.Println;
Println('Среднее', a.Average)
end.
<h3>n= 13</h3><h3>6 12 18 24 30 36 42 48 54 60 66 72 78</h3><h3>Среднее 42 </h3>
1) Это полное имя файла<span>
2) Это путь до папки "</span>System"
3) Это относительное имя файла<span>
4) Это относительное имя файла</span>
5) <span>Это </span><span>относительное имя файла</span>, без расширения
Скорей всего, тут имелось ввиду имя файла, находящееся в текущем каталоге. Ответ: 4
P.S. В принципе, именем файла может быть и exe, если оно не является расширением. Если в задании в 5 варианте ответа перед exe не стоит точка, то это может быть именем файла. Но, если перед exe стоит точка, то это расширение имени файла..
10011010, если расписывать, то просто 154 делить на два в столбик, и всё остатки должны сойтись с моим полученным числом, удачи!