Нужно построить трассировочную таблицу к этому алгоритму: var x, a, b, f, p :i nteger; s, c : real;
begin
writeln('Введите x');
read(x);
s := 0;
a:= 1;
c:=1;
while a 0 then begin c:= -1*(p/f); end {+ меняется на -}
else if c < 0 then c := p/f; {- меняется на +}
s := s - c; {считается сумма}
writeln('a=',a,', p/f=',p/f:2:2,', s=',s:2:2, ', c=',c:2:2);
a := a+2;
end;
writeln('s=',s:2:2);
end.
Также решение программы:
x=3
a=1, p/f=3.00, s=3.00, c=-3.00
a=3, p/f=4.50, s=-1.50, c=4.50
a=5, p/f=2.02, s=0.53, c=-2.02
a=7, p/f=0.43, s=0.09, c=0.43
a=9, p/f=-0.65, s=-0.56, c=0.65
a=11, p/f=-3.62, s=-4.18, c=3.62
a=13, p/f=-1.61, s=-5.79, c=1.61
s=-5.79
Очень надо!!

213

425

Посмотреть ответы 1

Ответы на вопрос:

математик202

Информатика

4,6(52 оценок)

uses crt;

var a: integer;

b: char(вроде так пишется);

begin

clrscr;

writeln('сколько лет? ');

readln(a);

case a of

0..5: b: =yasli;

6..18: b: =school;

19..45: b: =rabota

else b: =pensia

end;

writeln(b)

end.

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.