Запиши, чем цикл, повторяющийся при выполнении условия, отличается от цикла, повторяющегося до выполнения условия.

Циклический алгоритм

Цикл - это многократно повторяющиеся действия с разными значениями исходных данных.
Составляющими элементами любого цикла являются:
          Подготовка цикла - ПЦ,
          Тело цикла - ТЦ,
          Подготовка данных - ПД,
          Проверка условия - ПУ.
Выполнение любого цикла начинается с ПЦ. Последовательность выполнения ТЦ, ПД, ПУ зависит от структуры цикла. В связи с этим различают следующие типовые структуры цикла:
          1. Цикл с предусловием - ЦИКЛ ПОКА (WHILE … WEND).
          2. Цикл с постусловием - ЦИКЛ ДО (DO … LOOP).
          3. Цикл с параметром - ЦИКЛ со СЧЕТЧИКОМ (FOR … NEXT).Цикл с предусловием / ПОКА

Перед выполнением операторов тела цикла осуществляется проверка условия на продолжение цикла. Если условие справедливо (ветвь «Да»), то цикл повторяется, иначе происходит выход из цикла.
Особенности данной структуры цикла:
          а) число повторений цикла заранее неизвестно;
          б) если при первой же проверке условия получается "Нет", то цикл не выполняется ни разу;
          в) возможен «бесконечный цикл», когда проверка условия не дает выхода на ветвь «Нет». 
Цикл с постусловием - ДО

В блоке "Проверка условия" осуществляется проверка условия на прекращение цикла. Если условие справедливо (ветвь «Да»), то происходит выход из цикла, в противном случае цикл повторяется при новых значениях исходных данных. 
Особенности данной структуры цикла:
          а) число повторений цикла заранее неизвестно;
          б) так как условие проверяется в конце цикла, то тело цикла выполняется как минимум один раз;
          в) возможен «бесконечный цикл», когда проверка условия не дает выхода на ветвь «Да». 
Цикл с параметром

Параметр цикла определяет число повторений цикла. Для параметра цикла указывается его начальное значение, конечное значение и шаг изменения. Тело цикла выполняется при каждом значении параметра цикла.
Особенность данной структуры цикла заключается в том, что уже перед началом выполнения цикла известно количество его повторений.
Пример. Вычислить значения функции вида y = f(x) при изменении x от начального значения xn до конечного значения xk с постоянным шагом h.
Эта задача решается с цикла с заданным количеством повторений. Число повторений определяется по формуле:
n = (xk - xn) / h + 1.

На рисунках (см. ниже) представлены блок-схемы решения задачи:
- с использованием цикла ПОКА;
- с использованием цикла с ПАРАМЕТРОМ.
ЦИКЛ - ПОКА          ЦИКЛ С ПАРАМЕТРОМ

                    Блок 3 – подготовка цикла                    Блок 3 выполняет те же функции,
                   Блок 4 – проверка условия                    что и блоки 3,4,7 в схеме слева.
                   окончания цикла
                   Блок 5,6 – тело цикла
                   Блок 7 – подготовка информации
                   для нового цикла
Операторы цикла

Цикл с ПАРАМЕТРОМ реализуется в Бейсике с оператора цикла FOR … NEXT. Формат записи оператора:
FOR I = IN TO IK [STEP H]
< операторы тела цикла >
NEXT I
Пояснения:
- FOR (для), TO (до), STEP (шаг), NEXT (следующий) – служебные слова;
- I – имя переменной, являющейся параметром цикла;
- IN, IK, H – выражения, определяющие начальное значение IN параметра цикла, конечное значение IK параметра цикла и шаг изменения H параметра цикла. По умолчанию H=1. Значение выражений IN, IK, H должны удовлетворять следующим условиям:
при H > 0 (шаг положительный) IN < IK;
при H < 0 (шаг отрицательный) IN < IK.

Например:
1) FOR X=10 TO 100 STEP 2
LET Y=SQR (X)
PRINT X,Y
NEXT X
2) FOR X=10 TO 1 STEP – 1
LET Y=X - 2
PRINT X,Y
NEXT X

Важно запомнить следующее:
1.Вход в цикл минуя строку начала цикла FOR - запрещен.
2.Открыли цикл – не забудьте его закрыть.
3.До выход из цикла осуществляется с оператора EXIT FOR
4.В структуре вложенных циклов цикл, открытый первым, закрывается последним. 

Var b,c:boolean;
a:integer;
begin
readln(a);
writeln(not odd(a));
if a mod 10 = 7 then b:=true;
writeln(b);
writeln(not odd(a mod 10));
end.

var r,a:integer;
begin
read(r,a);
if a*a>pi*r*r then writeln('Square')
else if a*a<pi*r*r then writeln('Circle')
else writeln('Equal');
end.

var m1,m2,v1,v2:integer;
begin
read(m1,v1,m2,v2);
if m1/v1>m2/v2 then writeln('p1>p2')
else if m1/m2<m2/v2 then writeln('p1<p2')
else writeln('p1=p2');
end.

var a,b:real;
begin
read(a,b);
b*=0.45;
if a>b then writeln(b)
else if a<b then writeln(a)
else writeln('Equal');
end.

Не знаю паскаль, знаю C++ :)

{ 

int a, b;

//вводим значения в a и в b (в футах)

cin >> a >> b;

b = b*45;

if (a>b) cout << "В км больше";

else cout >> "В футах больше"; 

} 

 

{ 

// тут важен дробный тип 

dooble a, b;

//вводим значения в a и в b (м/c)

cin >> a >> b;

a = a:3.6;

if (a>b) cout << "В км/ч больше";

else cout >> "В м/с больше"; 

}

 

ну а дальше надо уже все по формулам смотреть. 

{

doouble a,b;  

//вводим значения в a и в b стороны

cin >> a >> b;

a=a*a*3.14;

b=b*b;

if(a>b) cout << "Площадь круга больше";

else cout << "Площадь квадрата больше"; 

} 

 

4. не знаю как такое делать, что значит уместиться ли круг в квадрате? Уместится если радиус его меньше чем половина стороны.

 

5.

{

  doouble a,b,c,d;

  cin >> a >> b >>c >>d; // вводим объем и массу;

 a = a/b;

c = c/d;

if(a>c) cout << "Тело 1 имеет плотность больше чем тело 2";

else cout << "тело 2 имеет большую плотность"; 

} 

 

6. не знаю. Но тоже как-то через форумулы.