var
r,h,s:real;
begin
Read(r);
h:=2*Pi*r;
s:=2*pi*sqr(r);
Writeln('Площадь круга: ', S:5:2);
Writeln('Периметр окружности: ', h:5:2);
end.
10 символов
32 = 2^5 => 5 бит/символ
10 * 5 = 50 бит
Ответ; <span>320x320; 240x320; 480x240
</span>
<em><u> P.S. Надеюсь на благодарность и лучший ответ.</u></em>
! Можешь сделать так!
1) Кто я такой, о себе.
2) Чем занимаешься, любимые хобби и занятия
3) Любимое блюдо, друг, время нода и т.п. Почему?
4) Как ты себя оцениваешь, любишь ьи ты себя (ответь это от себя)
Program p1;
uses crt;
var a,b,c,d,e,s:integer;
begin
a:=50;
b:=10;
c:=5;
d:=1;
writeln('сколько у вас монет по 50');
read(e);
s:=a *e;
writeln('сколько у вас монет по 10');
read(e);
s:=s+b*e;
writeln('сколько у вас монет по 5');
read(e);
s:=s+c*e;
writeln('<span>сколько у вас монет по </span> 1');
read(e);
s:=s+d*e;
write('Всего копеек ',s);
end.