Если не тот язык, укажите какой нужен.
var a: integer;
f: real;
begin
write('Введите а: '); readln(a);
if(a <= 0) then f := sqr(a) + 4*a + 5
else f := 1 / (sqr(a) + 4*a + 5);
writeln('f(', a, ') = ', f);
end.
WordPad – это программа для редактирования текста, которую можно использовать для создания и редактирования документов. В отличие от документов программы «Блокнот», документы WordPadмогут включать сложное форматирование и графику, можно связывать или внедрять в документ объекты, например изображения или другие документы.

Создание, открытие и сохранение документов в WordPad
Для создания, открытия и сохранения документов в редакторе WordPad используйте команды представленные ниже.
Чтобы...Выполните следующие действия...
Создать новый документ
Нажмите  и выберите команду Создать
Открыть документ
Нажмите  и выберите командуОткрыть
Сохранить документ
Нажмите  и выберите командуСохранить
Сохранить документ с новым именем или в другом формате
Нажмите  и выберите командуСохранить как, а потом выберите имя и формат, в котором необходимо сохранить документ
Примечание: WordPad можно использовать для открытия и сохранения текстовых документов (.Txt), документов в формате RTF (.Rtf), документов Word (.Docx) и текстовых документов OpenDocument (.Odt). Документы в других форматах открываются как текстовые документы и могут выглядеть неправильно.
Компьютер - это универсальное программно управляемое устройство для обработки, хранения и передачи информации
var a:array[1..10] of integer;
i:byte;
begin
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
writeln(a[i]*2);
end.