Построить блок-схему к программе

@Алиса Белатриса · Регистрация: 08.05.2011

Помогите, пожалуйста, построить блок-схему к программе!

Pascal

Program rty;
Uses crt;
Var n,I,s:integer;
Begin
Clrscr;
N:=15; s:=0;
For i:=1 to n do
If I mod 7=0 then s:=s+1;
Writeln(‘otvet s=’,s);
Readln;
End.

@ZevsNet · 10.05.2011, 18:15

Не обращайте внимания на то что написано ручкой)

magirus · 10.05.2011, 18:42

Комментарий модератора

Алиса Белатриса, называйте темы информативно.

@ZevsNet 78 / 50 / 46 Регистрация: 30.09.2010 Сообщений: 138
	10.05.2011, 18:15	2
	Не обращайте внимания на то что написано ручкой) 0 Миниатюры

Опции темы