Текст программы (507113)

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла

• Текст программы:

type mas=array[1..10] of real;

var

s,t,a,b:real;z,c:real;n,m,l:mas;

i:byte;

function f(x,y:real):real;

begin

f:=(sqrt(x*y)/(sqrt(sqr(x)+2*x*y+y)));

end;

function p(i:integer):real;

begin

if i=1 then p:=sqrt(2)

else p:=(p(i-1)+2*p(i-1))/(z)

end;

function H(i:integer):real;

begin

if i=1 then H:=cos(2)

else H:=(H(i-1)+sqr(H(i-1)))/(z)

end;

procedure zad (t:byte; var mt:mas);

begin

for i:=1 to t do

mt[i]:=random(20)

end;

procedure vivod (t:byte;mt:mas);

begin

for i:=1 to t do

write (mt[i]:4:0);

writeln;

end;

procedure preob (t:byte;s:real;var mt:mas);

begin

for i:=1 to t do

if mt[i] >0 then mt[i]:=mt[i]/s;

end;

begin

write('s=');

readln(s);

write('t=');

readln(t);

a:=f(s+sqr(t),t)+f(s,t);

b:=(f(s+5,t+5)/(t+s))+f(s,t);

writeln(a,b);

begin

write('z=');

readln(z);

c:=sqr(p(4))/H(4);

writeln(c);

end;

begin

randomize;

writeln('zadat znachenie a,b,c');

read(a,b,c);

zad(9,n);

writeln('isxodnaia posledovatelnost n');

vivod(9,n);

preob(9,a,n);

writeln('preobraz n');

vivod(9,n);

zad(10,m);

writeln('isxodnaia posledovatelnost m');

vivod(10,m);

preob(10,b,m);

writeln('preobraz m');

vivod(10,m);

zad(8,l);

writeln('isxodnaia posledovatelnost l');

vivod(8,l);

preob(8,c,l);

writeln('preobraz l');

vivod(8,l);

readln;

end;

readln;

end.

Характеристики

Тип файла документ

Документы такого типа открываются такими программами, как Microsoft Office Word на компьютерах Windows, Apple Pages на компьютерах Mac, Open Office - бесплатная альтернатива на различных платформах, в том числе Linux. Наиболее простым и современным решением будут Google документы, так как открываются онлайн без скачивания прямо в браузере на любой платформе. Существуют российские качественные аналоги, например от Яндекса.

Будьте внимательны на мобильных устройствах, так как там используются упрощённый функционал даже в официальном приложении от Microsoft, поэтому для просмотра скачивайте PDF-версию. А если нужно редактировать файл, то используйте оригинальный файл.

Файлы такого типа обычно разбиты на страницы, а текст может быть форматированным (жирный, курсив, выбор шрифта, таблицы и т.п.), а также в него можно добавлять изображения. Формат идеально подходит для рефератов, докладов и РПЗ курсовых проектов, которые необходимо распечатать. Кстати перед печатью также сохраняйте файл в PDF, так как принтер может начудить со шрифтами.

Список файлов лабораторной работы