ITYourself! - компьютерная документация, книги, мануалы, it-тематика

???????? ????? ? ????????????

E-mail Печать PDF
Рейтинг пользователей: / 5
ХудшийЛучший 

???????? ????? ? ????????????

???????? ????? ? ???????????? ???????????? ? ????????? ? ??????, ????? ??????? ?? ???????? ?????????? ????????? ?????????????????? ? ?????????????? ?????????? ?????????? ??????????.

?????? ???????? ????? ????????? ?????????:

While <???????> do <????????>;

????? While, do - ????????????????? ????? (???? [??????????? ???????], ??????);

<???????> - ????????? ??????????? ????;

<????????> - ???????????? ???????? Turbo Pascal.

???????? ???????? ????????? ???????. ??????? ??????????? ???????, ???? ????????? ?????????? ????? ???????? ??????, ?? ??????????? ???????? ? ?????, ????? ???? ?????????? ????????? <???????> ? ??? ???????? ???????????. ???? ?????????? ????????? ????? ???????? ????, ???????? While ?????????? ???? ??????.

????? ??? ? ? ????????? ????? ? ??????????, ? ????? ? ???????????? ??? ????????????? ?????????? ??????????? ?????????? ??? ?????? ???????? ??????????? ? ?????????? ??????.

?????? 1.

???? ?????????????????? ????? ????? ?? ??????? ??????? ????. ????????? ????? ????????? ??????????????????.

....////

Program primer1;

Var i, a, s : integer;

Begin

s := 0;

Read (a);

While a <> 0 do

begin

s := s + a;

Read (a);

end;

Write ('????? ????????? ????? ', s);

End.

 

Добавьтe Ваш комментарий

Ваше имя (псевдоним):
Ваш адрес почты:
Заголовок:
Комментарий:

??????????




????????

Внимание!!! Файл sape.php не обнаружен. Проверьте правильность установки кода Sape.


C???????? ?????????