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

Помогите с Паскалем.

var w:integer
A,s:real
begin
s:=0 w:=1;
s:=s=1/w
w:=w+1+s
write(n/w)
w=5
end.
тут нужно исправить ошибку.

  1. Ответ
    Ответ дан Luceferks

    Ужс.

    var w,s:real;

    begin

       s:=0;

       w:=1;

       s:=s+1/w;

       w:=w+1+s;

       write((s/w):8:3);

    end.

    1. Ответ
      Ответ дан evgeniysuhanov0404
      Спасибо!!!
Самые новые вопросы