Цикл с предусловием это такой цикл, в котором условие проверяется перед выполнением тела цикла. А цикл с постусловием - на оборот, он сначала выполнит, а потом проверит условие и если условие true, то цикл завершится.
Цикл с постусловием, можно использовать в таких ситуациях, когда надо что-то сделать и если чего-то не хватает, то сделать еще раз. Напрмер отправить письмо на email, а если не отправилось, то повторить еще 3 раза. Сначала выполнится тело цикла, в котором находятся функции отправки письма и если отправка удачная, то сообщаем until() true. Иначе тело выполнится еще и еще и еще кучу раз, если мы не задали счетчик в теле цикла, как вариант...
Цикл с предусловием можно использовать, если надо проверять какое-то значение ПЕРЕД выполнением тела цикла и тебе не важно, должно ли оно хоть раз выполниться. Например запросить пароль у пользователя. Но если пользователь уже ввёл пароль, то зачем его запрашивать? Тут можно было бы использовать while
Тут зависит от задачи. Понятное дело речь идёт об преобразование в сторону уменьшения объема данных. Нужно отметить что для этой задачи большой объем информации нужно будет свертывать(объединять, группировать) по каким-то полям таблицы, а по каким то суммировать числовые значения. Вот эти две операции и определять манеру визуализации для достижения цели задачи. Само собой нужно будет решить какие данные не важны и будут в итоге отсеяны из визуализации. Так же если таблица имеет ссылочные поля, то можно задействовать метод графов, опять же с группированием однотипных элементов.
var n,i,s,a: integer;
begin
readln(n);
s:=0;
for i:=1 to n do begin
readln (a);
if (a div 7 <> 0) and (a mod 10 = 3) then
s:=s+a;
end;
writeln(s);
end.