Определить значение переменных i и f после выполнения следующих фрагментов программы:
var f: real; i: integer
f := 0; i := 3;
while i > 5 do begin
i := i+1;
f := f+4 * i; end;

После выполнения данного фрагмента программы значение переменной i будет равно 3, а значение переменной f будет равно 0.

Это происходит потому, что условие в начале цикла while i > 5 не выполняется, поскольку i равно 3, что меньше 5. Поэтому тело цикла не выполняется, и переменные i и f не меняют своих значений.

Хорошего вечера! Если возникнут вопросы - спрашивайте, к вашим услугам.