На паскале
var a: integer;
begin
write('Введите целое число'); Readln(a);
if a>=0 then write(a*a) else write(a*a*a);
end.
источник канал связи приёмник
учебник учащийся ученики
журнал друг окружающие люди
расписание водитель пассажиры
светофор цвета водители и пешеходы
Переменную рекомендуется делать мнемоническим.
В переменной допустимы только латинские буквы, цифры и нижний пробел,но переменная не может начинаться с цифры.