Var r,s,b:real;
begin readln (b);
r:=b/2*(1+sqr(2));
s:=8*sqr(r)*sqr(3)-(sqr(2)*2);
writeln (r);
writeln(s);
<span>end.</span>
Наименование, заполнение, раскрытие темы)
<span>неправильная последовательность</span>
Объявление
Только сегодня действует экспресс скидка на все товары для дома
приобретайте и не пожалеете!
По качественным и низким ценам
Вещи самых известных брендов Италии, России,Франции
Заходите сейчас и получите подарок и скидку!
Ул Пирогова 14
(Можно так)
В постоянной:сведения о компьютере,BIOS
44,94,94(четные) 47,97,99,97,99 (не четные(