Он отличается тем, что цикл с условием в конце выполниться хоть один раз, даже если условие неверное.
Виды компьютерных сетейВ зависимости от территориального расположения абонентских систем вычислительные сети можно разделить на три основных вида: локальные сети; региональные сети; глобальные сети.
Program n1;
var a,k: integer;
function summa( n: integer ): integer;
var s: integer;
begin
s:=0;
while n>0 do
begin
s:=s+n mod 10;
n:=n div 10;
end;
summa:=s;
end;
begin
k:=0;
write('введите 1 число: ');
readln(a);
if (summa(a) mod 2=0) and(a<>0) then k:=k+1;
while a<>0 do
begin
write('введите следущее число: ');
readln(a);
if (summa(a) mod 2=0) and(a<>0) then k:=k+1;
end;
writeln('количество: ',k);
end.
Если числа небольшие и X в N степени умещается в longint, то можно в цикле от 1 до n умножать на x
var i,x,n:integer;
l:longint;
begin
readln(x,n);
l:=1;
for i:=1 to n do
l:=l*x;
write(l);
end.
Математик Эйлер... Швейцария (1707—1727)
Леонард Эйлер родился в 1707 году в семье базельского пастора Пауля Эйлера, друга семьи Бернулли. Рано проявил математические способности. Начальное обучение получил дома под руководством отца, учившегося некогда математике у Якоба Бернулли. Пастор готовил старшего сына к духовной карьере, однако занимался с ним и математикой — как в качестве развлечения, так и для развития логического мышления. Одновременно с обучением в гимназии мальчик увлечённо занимался математикой, а в последние гимназические годы посещал университетские лекции младшего брата Якоба, Иоганна Бернулли.
Базельский университет в XVII—XVIII веках
20 октября 1720 года 13-летний Леонард Эйлер стал студентом факультета искусств Базельского университета. Но любовь к математике направила Леонарда по иному пути. Вскоре способный мальчик обратил на себя внимание профессора Иоганна Бернулли. Он передал одарённому студенту математические статьи для изучения, а по субботам пригласил приходить к нему домой, чтобы совместно разбирать непонятное. В доме своего учителя Эйлер познакомился и подружился с сыновьями Бернулли — Даниилом и Николаем, также увлечённо занимавшимися математикой.
8 июня 1724 года 17-летний Леонард Эйлер произнёс на латыни речь о сравнении философских воззрений Декарта и Ньютона и был удостоен учёной степени магистра.
В последующие два года юный Эйлер написал несколько научных работ. Одна из них, «Диссертация по физике о звуке» , получившая благоприятный отзыв, была представлена на конкурс для замещения неожиданно освободившейся в Базельском университете должности профессора физики (1725). Но, несмотря на положительный отзыв, 19-летнего Эйлера сочли слишком юным, чтобы включить в число кандидатов на профессорскую кафедру. Надо отметить, что число научных вакансий в Швейцарии было совсем невелико. Поэтому братья Даниил и Николай Бернулли уехали в Россию, где как раз шла организация Академии наук; они обещали похлопотать там и о должности для Эйлера.
<span>В начале зимы 1726 года Эйлеру сообщили из Санкт-Петербурга: по рекомендации братьев Бернулли он приглашён на должность адъюнкта по физиологии с окладом 200 рублей [3]. Получение аванса для компенсации проездных расходов растянулось почти на год, и лишь 5 апреля 1727 года Эйлер навсегда покинул Швейцарию.</span>