протабулировать функцию f(x)=cos(x) на интервале [1;5] с шагом h=0,5, используя цикл repeat..until
Язык не указан, потому программа на Pascal.
var
x:real;
begin
x:= 1;
repeat
writeln(x= , x:3, f(x)= , cos(x));
x:= x+0.5;
until x>5;
end.
Оцени ответ
