Найдите ошибки Program pr3; var w, w1: integer; Readln (w); z:w/w1; Writeln (w1); End.​

Думаю, тебе нужно это:

Program pr3;

var w, w1, z: real;

begin

writeln('Введите w');

Readln(w);

writeln('Введите w1');

Readln(w1);

z:=w/w1;

Writeln(z);

end.

Program zadanie_1;
Var a,b:integer;
Begin
 Writeln('Введите текущий год');
 Readln(a);
 Writeln('Введите год рождения');
 Writeln('Примечание:Значение текущего года не должно быть меньше значения года рождения, иначе программа не будет исполняться');
 Readln(b);
 If a>b Then Writeln('Количество прожитых лет=',a-b) 
           Else Writeln('Количество прожитых лет=',a);
End.

Program zadanie_2;
Var a,b,s:real;
Begin
 Writeln('Введите два любых числа');
 Readln(a,b);
 s:=a+b;
 If b<0 Then Writeln(a,'+','(',b),')','=',s) else Writeln(a,'+',b,'=',s);
End.

1. Списки - особый вид форматирования абзацев.  2. Существует три типа списков: маркированный, нумерованный номер и многоуровневый.  3. Существует несколько оформления некоторого фрагмента текста в виде маркированного или нумерованного списка Основной. Перед созданием списка курсор следует разместить в нужном месте документа и выполнить Главная --> Абзац --> Маркеры или Нумерация. В текущем месте документа появится маркер или номер того вида списка, который использовался последним. После этого можно вводить первый элемент списка. После его ввода следует нажать клавишу Enter - следующий номер или маркер появляются в следующей строке документа автоматически. Когда последний элемент списка введен, нужно повторно выбрать кнопку соответствующего списка на Ленте, или дважды нажать Enter, или удалить номер (маркер) клавишей Автоматическое создание списка. Разместив курсор в нужном месте документа, следует ввести некие специальные условные символы, которые определяют вид желаемого списка, и нажать клавишу Пробел. Сразу же условные символы превратятся в соответствующий маркер или номер, после чего можно вводить первый элемент списка Превращение текста в список. Если некоторые абзацы текста, введенного ранее, нужно оформить как список, то следует выделить эти абзацы и выбрать на Ленте кнопку соответствующего типа списка: Маркеры, Нумерация. 3. Для создания многоуровневого списка на Ленте следует выбрать кнопку Многоуровневый список и вариант оформления списка в Библиотеке списков. Дальше нужно вводить элементы списка, изменяя при необходимости их уровни вложения. 4. Колонки - прием форматирования текста, применяемое для лучшей читабельности объемного текста. 5. Для вставки в текстовый документ графического изображения из файла, который сохранен на внешнем носителе, следует выполнить Вставка - Иллюстрации - Рисунок. После этого в диалоговом окне Вставка рисунка выбрать нужный файл. Для вставки в текстовый документ графического изображения из коллекций нужно выполнить Вставка - Иллюстрации - Клип. Эти действия открывают область задач Клип, которая предоставляет возможность осуществлять поиск нужных изображений и просматривать эскизы найденных.  6. Обтекание рисунка текстом - функция, которая используется для компактного размещения материала и связывания между собой рисунка и текста. Можно задать такие виды обтекания: обтекание текстом, вокруг рамки, по контуру, сквозное, сверху и снизу.