Объяснение:
^ не ставится, но действие выполняется, у себя его ставьте!
Может фотографировать, интернет, редактировать и т.д
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
SeqGen(6,i->(i+10)**3).Println
end.
<u>Результат</u>
1000 1331 1728 2197 2744 3375
Program pr;
uses crt;
Var a, b, p, s:real;
Begin
Writeln('Введите сторону a');
readln(a);
Writeln('Введите сторону b');
readln(b);
s:=a*b;
p:=2*(a+b);
Writeln('Площадь = ', s);
Writeln('Периметр = ', p);
readln;
<span>end.</span>
program task;
var a,b,c,x:real;
begin
readln(a,b,c);
x:=sqrt(4*a*c+b);
writeln(x)
end.