profile
Опубликовано 5 лет назад по предмету Информатика от stalnie

сооставие програму которая вычесляет произведения чисел от 2 до 10 на турбопаскаль

  1. Ответ
    Ответ дан Ruz34
    var i, s: integer;
    begin
    s:=1;
    for i:=2 to 10 do
    s:=s*i;
    writeln(s);
    end.
    1. Ответ
      Ответ дан Ruz34
      Ты перед моим кодом вставь: "Program <название>;"
    2. Ответ
      Ответ дан preceptor
      Решение неправильно.
    3. Ответ
      Ответ дан Ruz34
      Ой. решение правильное, просто переменная integer может хранить лишь в диапазоне от -32768 до +32767
    4. Ответ
      Ответ дан preceptor
      И оба в одну лужу :D