Program Kvadrat;
var a:real;
begin
writeln('Введите длину стороны квадрата');
readln(a);
writeln('Площадь квадрата = ', sqr(a));
end.
2*6²+2*6+2-(5*7+6)=2x²+3x+1
45=<span>2x²+3x+1
</span><span>2x²+3x+1-45=0
Решаем кв. уравнение
D=b</span>²-4ac=361
<span>x=(-b</span>²+√361)/2a
<span>x=2,5 Решения нет Система </span>счисления не м.б. дробной или отрицательной. Проверьте, может числа др.
Объем изображения= количество пикселей экрана*глубину кодирования=
1024*768*32= 25165824 бит
25165824/8= 3145728 байт
3145728/1024= 3072 Кбайт
3072/1024= 3 Мбайт
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
for var i := 1 to 10 do
Writeln(i, ') y = ', sqrt(i));
end.