Предмет: Информатика,
автор: Milo2001
Помогите!!! Пожалуйста!!!!
Составьте программу, решающую следующую задачу: Дано число n. Если оно неотрицательно, то возвести его в квадрат, а если отрицательно, то в третью степень.
Ответы
Автор ответа:
0
program zadacha;
var
n,x:real;
begin
writeln('vvedite chislo');
readln(n);
if n>0 then x:=sqr(n);
if n<0 then x:=sqr(n)*n;
writeln(x);
end.
Приложения:

Похожие вопросы
Предмет: Математика,
автор: kostyakuvakin0
Предмет: Английский язык,
автор: dasha311024
Предмет: Литература,
автор: vargo84
Предмет: Биология,
автор: Nikoly2010