Endy
Опубликовано 6 лет назад по предмету Информатика от Endy


даны три действительных числа. возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень - отрицательные

  1. Ответ
    Ответ дан nastos

    я так понимаю надо написать Паскале

    1uses crt;

    2var a,b,c:real;

    3            i:byte;

    4 begin

    5clrscr;

    6writeln('Введите 3 действительных числа:');

    7readln(a);

    8if a>=0 then a:=a*a else a:=sqr(sqr(a));

    9 readln(b);

    10if b>=0 then b:=b*b else b:=sqr(sqr(b));

    11readln(c);

    12if c>=0 then c:=c*c else c:=sqr(sqr(c));

    13write('a=',a:0:2,' b=',b:0:2,' c=',c:0:2);

    14readln

    15end.

     

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц