начало
делим на 2
есть остаток нет остатка
возводим в куб возводим в кводрат
конец
на языке pascal цикл с постусловием имеет следующий вид: :
repeat < тело цикла> until < условие выхода>на языке си:
do { < тело цикла> } while (< условие продолжения цикла> )в трактовке условия цикла с постусловием в разных языках есть различия. в паскале и языках, произошедших от него, условие такого цикла трактуется как условие выхода (цикл завершается, когда условие истинно, в терминологии такие циклы называют ещё «цикл до»), а в си и его потомках — как условие продолжения (цикл завершается, когда условие ложно, такие циклы иногда называют «цикл пока»).
Поделитесь своими знаниями, ответьте на вопрос:
Составить программу в паскале по решению функции x в квадрате + 5 при x> 3 x-8 при x меньше или равно трем
program prog;
var x:integer;
begin
write('Введите x: ');
readln(x);
if x > 3 then
x:=x * x + 5;
if x <= 3 then
x:=x-8;
writeln(x);
end.