Копирование файл На диске D есть три папки Есенин, Пушкин, Блок. Пользователь вырезал папку Есенин и оставил ее в папку Блок. Что при этом произошло? Выберите один вариант.
1. на диске D теперь 2 папки: Блок и Пушкин. А папка Есенин в папке Блок
2. ничего не произошло
3. на диске 3 папки: Есенин, Блок и Пушкин. Но в папке Блок теперь еще папка Есение

1. На диске D теперь 2 папки: Блок и Пушкин. А папка Есенин в папке Блок

Объяснение:

Существует диск D с 3 папка: Есенин, Блок, Пушкин.

Пользователь вырезал папку "Есенин" и вставил её в папку "Блок", соответственно копия не создалась, а расположение папки изменилось с D:\Есенин на D:\Блок\Есенин. Поэтому на диске D:\ теперь две папки, а в папке "Блок" хранится папка "Есенин"

program first; var i,a,b: integer; begin  cls;   read(a,b,i);   if a< 0 then write(sqr(a));

  if b< 0 then write(sqr(b));

  if i< 0 then write(sqr(i))end.

program e7;

var x: integer;

begin

writeln('vvedite znachenie gradusnoi meri ugla');

readln(x);

if a=180 then writeln('razvernutii') else writeln('ne razvernutii');

readln;

end.

если вы работаете в школе на программе freepascal, то перед "end" можно "readln" не писать. если же вы работаете на программе turbopascal, "readln" перед "end" обязательно нужно писать.