Перейти к содержанию

Алексей 2014

Пользователи
  • Постов

    5
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные Алексей 2014

  1. помогите ответить на вопрос, в паскале

    Что будет если х будет отрицательным? Как можно это исправить?

    1.program prim9

    2.var: x,s:real;

    3.i:integer;

    4.a:array[1...5]of real;

    5.function ct(y,z,t:real):real;

    6.begin

    7.ct:=z*exp(t*ln(y));

    8.end

    9.begin

    10.readln(x);

    11.for i:=0 to 4 do begin

    12.write("a=");

    13.readln(a);

    14.end

    15.for i:=0 to 4 do

    16.s:=s+ct(x:a);

    17.writeln("s=",s:10:2);

    18.end

×
×
  • Создать...