Есть ответ 👍

Var x, y: real; begin x : = -5; writeln(' x y '); while x < = 5 do begin y : = 5 - x*x/2; writeln(x: 4: 1,' | ',y: 5: 2); x : = x + 0.5 end; end. : из цикла while в цикл for

117
236
Посмотреть ответы 2

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


ответ:

вот код

объяснение:

program pr2(output);

var x,y: real;

var i: integer;

begin

x: =-5;

writeln(' x       y ');

for i: =1 to 21 do begin

y: =5-x*x/2;

writeln(x: 4: 1,'|',y: 5: 2);

x: =x+0.5

end;

end.

DLM1
4,4(21 оценок)

Большая наглядность, возможность отображения динамических процессов, интерактивность

Популярно: Информатика