Заменить repeat и until в этой программе: var x,y: real; begin; x: =5; repeat y: =4*x-5; writeln('if x=',x,' then y=',y); x: =x+0.5; until x=10.5; end.

covo1 covo1    1   13.09.2019 00:30    1

Ответы
mspasenkova mspasenkova  07.10.2020 10:46
Var x,y:real;
begin;
x:=5;
while x < 10.5 do
begin
  y:=4*x-5;
  writeln('if x=',x,' then y=',y);
  x:=x+0.5;
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика