• Вопрос по информатике:

    Дан фрагмент программы. Что появится на экране?
    S:=0;

    FOR I:=1 TO 4 DO

    BEGIN

    MAS[I]:=I;

    S:=S+MAS[I];

    END;

    WRITELN (S);

    • Автор:

      shepard
  • Ответ:

    var   s: integer;   mas: array[1..4]of integer;  begin   s := 0;   for var i := 1 to 4 do begin     mas[i] := i;     s := s + mas[i];   end;   writeln(s); end.Ответ:10
    • Отвечал:

      pippy0e0n

    Ответов нет, но ты это испарвиш!