Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
если в сети необходимо пройти регистрацию, то должны сделать ее так, чтобы в ней не было указано никакой личной информации.
я так понимаю надо написать паскале
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.
50зн=50байт
60зн=60байт
1кбайт= 1024байта
1мб=1024кбайта
=> 1мбайт=(1024*1024)байт
1мбайт=1048576 байт
50байт/1048576байт=0,0000476837мбайт
60байт/1048576байт=0,0000572205мбайт
Популярные вопросы