Напишите программу (в Паскаль) для функции у=х(в кубе)-1 на интервале [-1,3] с шагом 0.2 на трех разных циклах (ДО,ПОКА,ДЛЯ)
Оно?
varx, y: integer;
beginwrite (x = );
readln (x);
if x > 0 theny := x - 2elseif x = 0 theny := 0elsey := abs (x);
writeln (y = , y);
readlnend.
Оцени ответ
