и какая вероятность что пользователь не ошибется?)))
program i_guess_number; uses crt; var changes: array [1..2,1..10] of integer; i,op,n:integer; s:string; res:real;
BEGIN randomize; writeln("Загадайте число"); n := 0; repeat n := n+1; i := random(10); op := random(4);
case op of 1: s := "Прибавте "; 2: s := "Отнимите "; 3: s := "Умножте на "; else s := "Поделите на "; end;
writeln(s, i); changes[1,n] := op; {запоминаем действия} changes[2,n] := i; until n = 10;
writeln("Что вышло?"); readln(res);
for i := n downto 1 do { производим обратные действия } begin case changes[1,i] of 1: res := res - changes[2,i]; 2: res := res + changes[2,i]; 3: res := res / changes[2,i]; else res := res * changes[2,i]; end; end;
Сегодня, интернет есть почти в каждом доме. В интернете можно найти много очень полезной информации для учебы или для чего-нибудь другого. Многие люди смотрят в интернете фильмы и играют в игры. Также, в интернете можно найти работу или даже новых друзей. Интернет не терять связь с родственниками и друзьями, которые живут далеко. Благодаря интернету с ними можно связаться в любую минуту. Мама очень часто готовит вкусные блюда, которые нашла в интернете. Еще, интернет и тем, кто любит читать, но не имеет возможности часто покупать новые книги.
С одной стороны – интернет является очень полезным, потому что содержит очень много разной информации. В интернете можно найти все, что интересует. Но иногда, интернет становится злом и может принести вред. Если человек проводит в интернете слишком много времени, то может не успевать с остальными делами. Поэтому, нужно контролировать время, которое проводится за интернетом. Еще, очень многие проводят время в интернете вместо того, чтобы погулять с друзьями на улице. Наверное, именно поэтому, родители не разрешают мне проводить за интернетом все свободное время.
Но, все-таки преимуществ у интернета намного больше, чем недостатков. Есть очень много полезных сайтов, которые в учебе. Еще, лично мне, очень нравится общаться в интернете с теми, у кого похожие увлечения. Например, я люблю фотографировать и поэтому зарегистрировалась на нескольких сайтах фотолюбителей. Участники сайта выкладывают свои работы, подсказывают и новичкам.
Так что, интернет является отличным во многих ситуациях, нужно только уметь находить информацию. Также, важно не ставить интернет на первое место и не забывать о реальном общении и о занятиях спортом.
и какая вероятность что пользователь не ошибется?)))
program i_guess_number;
uses crt;
var changes: array [1..2,1..10] of integer;
i,op,n:integer;
s:string;
res:real;
BEGIN
randomize;
writeln("Загадайте число");
n := 0;
repeat
n := n+1;
i := random(10);
op := random(4);
case op of
1: s := "Прибавте ";
2: s := "Отнимите ";
3: s := "Умножте на ";
else s := "Поделите на ";
end;
writeln(s, i);
changes[1,n] := op; {запоминаем действия}
changes[2,n] := i;
until n = 10;
writeln("Что вышло?");
readln(res);
for i := n downto 1 do { производим обратные действия }
begin
case changes[1,i] of
1: res := res - changes[2,i];
2: res := res + changes[2,i];
3: res := res / changes[2,i];
else res := res * changes[2,i];
end;
end;
writeln("Вы загодали ",res);
END.
Объяснение:
Сегодня, интернет есть почти в каждом доме. В интернете можно найти много очень полезной информации для учебы или для чего-нибудь другого. Многие люди смотрят в интернете фильмы и играют в игры. Также, в интернете можно найти работу или даже новых друзей. Интернет не терять связь с родственниками и друзьями, которые живут далеко. Благодаря интернету с ними можно связаться в любую минуту. Мама очень часто готовит вкусные блюда, которые нашла в интернете. Еще, интернет и тем, кто любит читать, но не имеет возможности часто покупать новые книги.
С одной стороны – интернет является очень полезным, потому что содержит очень много разной информации. В интернете можно найти все, что интересует. Но иногда, интернет становится злом и может принести вред. Если человек проводит в интернете слишком много времени, то может не успевать с остальными делами. Поэтому, нужно контролировать время, которое проводится за интернетом. Еще, очень многие проводят время в интернете вместо того, чтобы погулять с друзьями на улице. Наверное, именно поэтому, родители не разрешают мне проводить за интернетом все свободное время.
Но, все-таки преимуществ у интернета намного больше, чем недостатков. Есть очень много полезных сайтов, которые в учебе. Еще, лично мне, очень нравится общаться в интернете с теми, у кого похожие увлечения. Например, я люблю фотографировать и поэтому зарегистрировалась на нескольких сайтах фотолюбителей. Участники сайта выкладывают свои работы, подсказывают и новичкам.
Так что, интернет является отличным во многих ситуациях, нужно только уметь находить информацию. Также, важно не ставить интернет на первое место и не забывать о реальном общении и о занятиях спортом.