Во Определите значение переменной S после выполнения операторов:
...
i:=0; S:=0
While i<3 do
Begin
i:=i+1;
S:=S+i*i
End;
...
Укажите правильный вариант ответа:
а) 11
б) 3
в) 18
г) 0
д) 14

Question

Информатика: Во Определите значение переменной S после выполнения операторов: ... i:=0; S:=0 While i 3 do Begin i:=i+1; S:=S+i*i End; ... Укажите правильный вариант ответа: а) 11 б) 3 в) 18 г) 0 д) 14

КостяТрестьян · Accepted Answer

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 begin   var m:=ReadInteger( Количество элементов в массиве А (m): );   var n:=ReadInteger( Количество элементов в массиве B (n): );   var k:=ReadInteger( Позиция вставки k (1 k m): );   if (k 1) and (k m) then begin     var a:=ArrRandom(m,1,99); Writeln( Массив A ); a.Println;     var b:=ArrRandom(n,1,99); Writeln( Массив B ); b.Println;     Writeln( Результат вставки ); (a[:k]+b+a[k:]).Println     end   else Writeln( Вы нарушили условие 1 k m ) end....

Во Определите значение переменной S после выполнения операторов: ... i:=0; S:=0 While i<3 do Begin i:=i+1; S:=S+i*i End; ... Укажите правильный вариант ответа: а) 11 б) 3 в) 18 г) 0 д) 14

MOGZ ответил

Во Определите значение переменной S после выполнения операторов:
...
i:=0; S:=0
While i<3 do
Begin
i:=i+1;
S:=S+i*i
End;
...
Укажите правильный вариант ответа:
а) 11
б) 3
в) 18
г) 0
д) 14