Написать программу для вычисления заданного выражения 0,15 — 0,17 + 0,19 -…- 0,33 и вывода на экран полученного значения, используя заданный циклический оператор Repeat — Pascal(Паскаль)

uses crt;
var
 c,x:real;
begin
clrscr;
c:=0; x:=0.13;
repeat
c:=c+(x+0.02)-(x+0.04);
x:=(x+0.04);
until x>0.33;
Writeln('c=',c:4:2);
readln
end.

Leave a Comment

3 + 6 =