Предмет: Информатика,
автор: vladislav905
Умоляю помогите очень надо, исправить оценку
Приложения:

Ответы
Автор ответа:
1
Ответ:
var p,a,b,c,s:integer;
begin
readln(a, b, c);
p:=a-b;
if p>0 then s:=p*p*p
else s:=c-p;
writeln(s);
end.
Объяснение:
vladislav905:
я надеюсь что верно
Интересные вопросы
Предмет: Русский язык,
автор: анита654982
Предмет: Технология,
автор: IIaIIashaUA
Предмет: Русский язык,
автор: Steam111
Предмет: Математика,
автор: teonalebedeva3