Вфайле записаны данные о результатах сдачи экзамена. каждая строка содержит фамилию, имя и количество , разделенные пробелами: вывести в другой файл данные учеников, которые получили больше 80 . список должен быть отсортирован по убыванию . формат выходных данных: п. иванов 98 и. петров 96

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.

размер объекта- эскиз

форму реального объекта - чертежа

  цвет объекта-рисунка

  элементный состав объекта   -схемы

  отношения между объектами - диаграммы эйлера-венна

  стоимость объекта   -числа

объект-фотографии 

на диске и во перативной памяти информация хранится   двоичном формате и

как я понял надо составить блок-схему

задаете числа, и задаете периметр и площадь равный 0

условие что все больше 0

если да то дальше если нет то конец

после этого сразу проверка на ваши больше и меньше 0 и тому прочее

если не выполняется какое-то условие то конец,если все вып. то опять условие 

с^2=a^2+b^2

если да то выполнить действие s=a*b   вывод s   end

если нет то p=a+b+c   вывод p   end