For, While, Repeat ... Не понимаю.. - Помощь студентам - Страница 2

ROMA2PVT · 07.10.2010, 00:02

Grag · 07.10.2010, 11:22

Первая...
While:

Код:

S:=0;
j:=6;
while j<=24 do
  begin
    S:=S+j;
    Inc(j,2)
  end;

Repeat:

Код:

S:=0;
j:=6;
repeat
  S:=S+j;
  Inc(j,2)
until j>24

FOR:

Код:

S:=0;
for j:=6 to 24 do
  if not(odd(j)) then S:=S+j

07.10.2010, 00:02	#11
ROMA2PVT ТАМБОВСКИЙ ВОЛК. Участник клуба Регистрация: 16.03.2010 Сообщений: 1,354	вот тема http://programmersforum.ru/showthread.php?t=114246 にんじゃ

07.10.2010, 11:22	#12
Grag А может и не... Участник клуба Регистрация: 27.03.2010 Сообщений: 1,269	Первая... While: Код: `S:=0; j:=6; while j<=24 do begin S:=S+j; Inc(j,2) end;` Repeat: Код: `S:=0; j:=6; repeat S:=S+j; Inc(j,2) until j>24` FOR: Код: `S:=0; for j:=6 to 24 do if not(odd(j)) then S:=S+j` Перемешивай дело с бездельем и не сойдешь с ума...

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Canvas.Polygon - Не понимаю...	Mr_freeman	Помощь студентам	2	17.01.2010 13:56
Не понимаю ошибку	GoRdoN 17	Общие вопросы C/C++	3	19.07.2009 22:35
Алгоритм A*. Не понимаю	Anekdot	Gamedev - cоздание игр: Unity, OpenGL, DirectX	1	05.04.2009 17:12