лыжник, начав тренировки, в первый день пробежал 12 км. каждый следующий день он увеличивал пробег на 8% от пробега предыдущего дня. сколько километров он пробежит за 5 дней. на паскале
Program Markovsp1; uses crt; const eps=0.001; var t,s:real; i:integer; begin writeln('*** alphaues is thinking... ***'); writeln('*** OK ***'); writeln(); writeln('Программа вычисляет частичную сумму ряда '); writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... '); writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001'); используется цикл repeat'); writeln(); s:=0; i:=1; repeat t:=1/((i)*(i)); s:=s+t; //writeln('i=',i,' T=',t:0:6,' S=',s:0:6); i:=i+1; until abs(t)<eps; writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6); writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6); end.
Program Markovsp2; uses crt; const eps=0.001; var t,s:real; i:integer; begin writeln('*** alphaues is thinking... ***'); writeln('*** OK ***'); writeln(); writeln('Программа вычисляет частичную сумму ряда '); writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... '); writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001'); используется цикл while'); writeln(); s:=0; i:=1; t:=1; while t>eps do begin t:=1/(i*i); s:=s+t; //writeln('i=',i,' T=',t:0:6,' S=',s:0:6); i:=i+1; end; writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6); writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6); end.
Никто не знает точно, где и когда возникла письменность. мы можем только предполагать, как она развивалась с древнейших времен. человек начал рисовать картинки, повествующие об охоте и войне, о жизни племен. картинки использовались также для передачи сообщений. изображение солнца означало день. две отметки рядом с солнцем обозначали два дня. такие значки называются пиктограммами. с развитием цивилизации этот метод письма был ускорен путем картинок. египтяне прибегали к волнистой линии для обозначения воды. китайцы рисовали ухо между двумя дверьми, что имело значение «слушать». такие знаки назывались идеографами или идеограммами. древние египтяне пользовались системой, которую мы называем иероглифами. сначала это была полностью идеографическая система. но в ходе веков египтяне создали и фонетическую систему, то есть такие знаки, которые означали звуки речи, а не только изображали предметы или явления. с развитием цивилизации возникла потребность в большом количестве знаков. так возник метод написания слов в соответствии с их звучанием. знаки, звуки, называются фонемами. слова при этом могут делиться на слоги. следующей стадией развития письменности стало создание алфавита. древние египтяне и жители вавилона знали, как писать алфавитным способом. по их методу были созданы греческий и латинский алфавиты, которыми широко пользуются в мире, за исключением азиатских стран.
Program Markovsp1;
uses crt;
const
eps=0.001;
var
t,s:real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Программа вычисляет частичную сумму ряда ');
writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... ');
writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001');
используется цикл repeat');
writeln();
s:=0;
i:=1;
repeat
t:=1/((i)*(i));
s:=s+t;
//writeln('i=',i,' T=',t:0:6,' S=',s:0:6);
i:=i+1;
until abs(t)<eps;
writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6);
writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6);
end.
Program Markovsp2;
uses crt;
const
eps=0.001;
var
t,s:real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Программа вычисляет частичную сумму ряда ');
writeln(' S=1+1/(2^2)+1/(3^2)+1/(4^2)+... ');
writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001');
используется цикл while');
writeln();
s:=0;
i:=1;
t:=1;
while t>eps do
begin
t:=1/(i*i);
s:=s+t;
//writeln('i=',i,' T=',t:0:6,' S=',s:0:6);
i:=i+1;
end;
writeln('s=',s:0:6,' (pi^2)/6=',(pi*pi)/6:0:6);
writeln('Приближение к (pi^2)/6 равно ',s-(pi*pi)/6:0:6);
end.