Опубликовано 03.01.2018 по предмету Информатика от Гость

Почему программа на паскале не подставляет начальное значение x (x:=0), а подставляет сразу x+h? Т.е. в выводе ответов первым должно идти значение -1, а идет совсем другое. И как в таком случае реализовать это?
Код программы:
program program3;
uses crt;
var x, y, c, h:real;
begin
clrscr;
x:=0;
h:=0.4;
repeat x:=x+h;
y:=power(x,1/3)-1;
writeln (y);
until x>=4;
end.

Ответ оставил Гость

Цикл начинается с того, что сразу же присваивает х значение 0.4, и после этого для у производятся вычисление исходя из х = 0.4. Чтобы х был изначально равен 0, нужно поменять местами строки в цикле, выглядит это так:

var
  x, y, h: real;
begin
  h := 0.4;
  repeat
     y := power(x, 1 / 3) - 1;
     x := x + h;
     writeln(y);
  until x >= 4;
end.

Здесь значение переменной у сначала будет равно результату вычисления, при котором х еще равен 0.
Строку x:=0; можно убрать, так как при объявлении переменной (в разделе var) ей присваивается 0 по умолчанию.
А также, есть лишняя переменная с.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы
Самые новые вопросы