решите в паскале пожалуйста СРОЧНО!!!

Приложения:

Ответы

Ответ дал: Cr0mvel
0
program name;
var F,x:integer;
begin
readln(x);
F:=x;
if x > 0 then
writeln(F)
else if x = 0 then
writeln('3')
else if x < 0 then
writeln(F*F*F);
end.

Насчёт power не уверен
Ответ дал: 89204405414
0
она идёт но в ней есть ошибки
Ответ дал: Cr0mvel
0
я немного поменял структуру. Может быть ошибка еще с power, как я и сказал
Ответ дал: Cr0mvel
0
вместо power можешь написать F*F*F
Ответ дал: Cr0mvel
0
ща исправлю
Ответ дал: Cr0mvel
0
все
Вас заинтересует