да, "королева времени" продолжение серии книг натальи щербы "часодеи".
о чем она :
"повезло детям из часодейного мира! утром накануне нового года они отмечают еще один праздник — день подарка под подушкой, причем подарки им приносит само время! но иногда все идет не так, как представлялось. феликс, олли и том уверены, что время что-то перепутало, и они получили совсем не те подарки, какие заслужили. но, может быть, ошибки еще можно исправить? пока бьют часы на старой башне, возможно все — добрые чудеса и злое колдовство, исполнение несбыточной мечты и крушение всех надежд только бы успеть до двенадцатого удара! "
уверена, что тебе понравится эта книга (ну или понравилась, если уже прочитала ее)
да, "королева времени" продолжение серии книг натальи щербы "часодеи".
о чем она :
"повезло детям из часодейного мира! утром накануне нового года они отмечают еще один праздник — день подарка под подушкой, причем подарки им приносит само время! но иногда все идет не так, как представлялось. феликс, олли и том уверены, что время что-то перепутало, и они получили совсем не те подарки, какие заслужили. но, может быть, ошибки еще можно исправить? пока бьют часы на старой башне, возможно все — добрые чудеса и злое колдовство, исполнение несбыточной мечты и крушение всех надежд только бы успеть до двенадцатого удара! "
уверена, что тебе понравится эта книга (ну или понравилась, если уже прочитала ее)
var
N, i, P, O, Z : Integer;
R : Real;
begin
Write('n = '); ReadLn(N);
P := 0; O := 0; Z := 0;
// для for // для while // для repeat
for i := 1 to N do // i := 0; // i := 0;
// while i < N do // repeat
begin // begin // Inc(i)
// Inc(i);
Write(i, ' число = '); ReadLn(R);
case sign(R) of
+1 : Inc(P);
-1 : Inc(O);
0 : Inc(Z);
end;
end; // end; // until i = N;
WriteLn('Процент положительных чисел: ', P*100/N);
WriteLn('Процент отрицательных чисел: ', O*100/N);
WriteLn(' Процент нулевых чисел: ', Z*100/N);
end.