Написать программу для вычисления заданного выражения и вывода на экран полученного значения

@Miradl · Регистрация: 17.11.2019

Написать программу для вычисления заданного выражения и вывода на экран полученного значения, используя заданный циклический оператор.

- 0,1+ 0,4 -0,7+…-1,9 While

@Puporev · 03.12.2019, 12:44

Pascal

var s,x,dx:real;
begin
x:=-0.1;
write(x:5:1);
dx:=-0.3;
s:=x;
while abs(x)<1.9 do
 begin
  x:=-x;
  dx:=-dx;
  x:=x+dx;
  write(x:5:1);
  s:=s+x;
 end;
writeln;
write('S=',s:0:1)
end.

@Miradl 1 / 1 / 0 Регистрация: 17.11.2019 Сообщений: 43
		1
	Написать программу для вычисления заданного выражения и вывода на экран полученного значения 03.12.2019, 12:11. Показов 3176. Ответов 1 Метки pascal (Все метки) Написать программу для вычисления заданного выражения и вывода на экран полученного значения, используя заданный циклический оператор. - 0,1+ 0,4 -0,7+…-1,9 While 0

Опции темы

Написать программу для вычисления заданного выражения и вывода на экран полученного значения

Решение