Предмет: Информатика, автор: DM45019

ОЧЕНЬ НАДО НАРОД! ПОМОГИЕТ
Создайте алгоритм и программу для вычисления значения функции F по формулам:

Приложения:

DM45019: хотя бы программу.

Ответы

Автор ответа: cccc1808
0
var   
a,r : integer;    
begin 
readln (a);     
if a < - 10 then   
  r := 2 * a * a * a   
else   
   if a > 5 then     
      r := 3 * a * a       
   else     
      r := a * a - 3 * a +1;   

writeln (r); 
end.

DM45019: это точно то?
Похожие вопросы
Предмет: Химия, автор: lisska353