Из слова информатика получено слово формат. вставьте пропущенные значения copy( информатика , что будет - id857857420200130 от RocketBubbleGum007 30.01.2020 13:47

Question

Информатика: Из слова информатика получено слово формат. вставьте пропущенные значения copy( информатика , что будет выведено в результате выполнения: writeln ( 24 + 24 = , 24 + 24)? что будет выведено в результате выполнения: а: = электростанция ; writeln(copy(a,1,7)); ?

RocketBubbleGum007 · Accepted Answer

//PascalABC.NET версия 3.2, сборка 1389

//Если программа не запускается, то обновите версию

uses System.Linq;

begin

writeln('III');

var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;

writeln;

while a.Any() do

begin

write(a[0], ' ');

a.RemoveAt(0);

if not a.Any then break;

write(a.Last, ' ');

a.RemoveAt(a.Count - 1);

if not a.Any then break;

var n := 0;

if a.Count > 1 then n := a.Count div 2 - 1;

write(a[n], ' ');

a.RemoveAt(n);

end;

end.

Объяснение:

MOGZ ответил