program - имя программы
var ввод переменных
integer целочисленный тип данных
real тип данных с плавающей точкой
begin начало программы
read прочтение переменных
write ввод текста в программе
end конец программы
Var
n,i,result:Integer;
Begin
Read(n);
result:=-1;
for i:=1 to n do
if (i*i=n) then
begin
result:=i;
break;
end;
Writeln(result);
end.
1)
отступы сверху, снизу, справа, слева
междустрочный интервал
выравнивание
отступ первой строки
2) отступ первой строки - значит подвигается только первая строка
отступ абзаца - двигается весь абзац целиком, со всеми строками
Файл .cs не прикрепляется, поэтому прикрепил с расширением .txt. Если нужен файл .cs, то убери из расширения .txt.
Формула нахождения объема закодированного звука
A = D * i * t * c (D - частота дискретизации, i - глубина бит/разрядность, t - время, c - кол-во каналов)
Приводим единицы измерения
D = 64.0 Гц (возможно тут описка, обычно 64 кГц)
t = 320 c
A = D * i * t * c = 64.0 * 64 * 320 * 1 = 1310720.0 бит = 160.0 Kбайт = 0.15625 Мбайт