М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
goplanozvgqa
goplanozvgqa
22.03.2022 21:49 •  Информатика

Исправьте program pr1; var f,x,pi,a,ak,an,da: real; begin write ('введите an,ak,da'); readln (an,ak,da); a: =an; while a< =ak+0.0001 do begin pi: = 3.14; x: =exp(a)+exp(-a); f: =0.5x-2cos(x)(x+pi/4); writeln('x=',x,'f=',f); a: =a+da; end; end.

👇
Ответ:
sitkovskiygleb
sitkovskiygleb
22.03.2022
Замени строчку f:=0.5x-2cos(x)(x+Pi/4);  на f:=0.5*x-2cos(x)*(x+Pi/4);
Без знака умножения не пойдет.
И  write ('введите an,ak,da');  лучше на writeln ('введите an,ak,da'); 
4,7(10 оценок)
Открыть все ответы
Ответ:
nikafolz
nikafolz
22.03.2022

Те́кстовый реда́ктор — самостоятельная компьютерная программа или компонент программного комплекса (например, редактор исходного кода интегрированной среды разработки или окно ввода в браузере), предназначенная для создания и изменения текстовых данных в общем и текстовых файлов в частности[1].

Текстовые редакторы предназначены для работы с текстовыми файлами в интерактивном режиме. Они позволяют просматривать содержимое текстовых файлов и производить над ними различные действия : вставку, удаление и копирование текста, контекстный поиск и замену, сортировку строк, просмотр кодов символов и конвертацию кодировок, печать и т. п.

Часто интерактивные текстовые редакторы содержат дополнительную функциональность, призванную автоматизировать действия по редактированию (от записываемых последовательностей нажатий клавиш до полноценных встроенных языков программирования), или отображают текстовые данные специальным образом (например, с подсветкой синтаксиса).

Многие текстовые редакторы являются редакторами исходного кода, то есть они ориентированы на работу с текстами программ.

4,4(92 оценок)
Ответ:
Vlada434
Vlada434
22.03.2022
Procedure TForm1.Button1Click(Sender: TObject);
begin
    If FontDialog.Execute then
        RichEdit1.SelAttributes.Assign(FontDialog1.Font);
        RichEdit1.SetFocus;
    End;
end;

делфи у меня не установлены за совершенной ненадобностью, потому проверить возможности нет, но догадки показать могу.
 Не уверенна что RichEdit1.SelAttributes.Assign(FontDialog1.Font) выставляет шрифт, может там нужна кострукция типа
  RichEdit1.SelAttributes.Font := FontDialog1.Font
и конечно описка выделенная ранее, как на нее только компилятор не матерится
4,7(10 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ