Помогите пожалуйста нарисовать блок-схему к задаче - Паскаль, Turbo Pascal, PascalABC.NET

Filosofijka · 30.11.2008, 10:55

Помогите пожалуйста нарисовать блок-схему для задачи. Не умею я их рисовать!(((
Вот решение
var A, B, i, sum: integer;

begin
sum := 0;
read(A, B);
for i := A to B do
if (i mod 5 = 0) and (i mod 13 = 0) then
sum := sum + i;
writeln(sum);
end.

Заранее спасибо

Serge_Bliznykov · 30.11.2008, 14:55

Есть такая программка, называется FCEditor

Вот, на форуме про неё было тут и дополнительно тут (решения с "лекарством")

И вот, что она сделала, когда я в неё загнал Ваш код...

Filosofijka · 01.12.2008, 10:23

Спасибо большое

30.11.2008, 10:55	#1
Filosofijka Пользователь Регистрация: 24.11.2008 Сообщений: 21	Помогите пожалуйста нарисовать блок-схему к задаче Помогите пожалуйста нарисовать блок-схему для задачи. Не умею я их рисовать!((( Вот решение var A, B, i, sum: integer; begin sum := 0; read(A, B); for i := A to B do if (i mod 5 = 0) and (i mod 13 = 0) then sum := sum + i; writeln(sum); end. Заранее спасибо

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите зделать блок-схему к готовой задаче	ShnapS	Паскаль, Turbo Pascal, PascalABC.NET	9	31.08.2010 20:42
Помогите нарисовать блок схему ио к такой задаче	gigaman	Паскаль, Turbo Pascal, PascalABC.NET	2	10.03.2008 15:12
Нарисовать блок схему к задаче Паскаль	gigaman	Помощь студентам	3	07.03.2008 19:50
Помогите нарисовать блок-схему на ооочень маленький кусочек программы!!!!!	metamfetamin	Помощь студентам	1	24.11.2007 22:55

30.11.2008, 14:55	#2
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	Есть такая программка, называется FCEditor Вот, на форуме про неё было тут и дополнительно тут (решения с "лекарством") И вот, что она сделала, когда я в неё загнал Ваш код...

01.12.2008, 10:23	#3
Filosofijka Пользователь Регистрация: 24.11.2008 Сообщений: 21	Спасибо большое