Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Program MissPhelps;
uses crt;
var a,b,x: integer;
F,k:real;
begin
writeln('Начало');
readln(a);
writeln('Конец');
readln (b);
F:=-999;
x:=a;
while x=b do begin
k:= sin(x)/((3*x)+7);
if F k then
F:=k ;
inc(x);
end;
write('Макс на отрезке',F);
end.